#include <inttypes.h>
#include <stdbool.h>
#include <stddef.h>
#include <stdlib.h>
#include <string.h>

#include "nvim/ascii_defs.h"
#include "nvim/buffer_defs.h"
#include "nvim/charset.h"
#include "nvim/cursor.h"
#include "nvim/edit.h"
#include "nvim/eval/typval.h"
#include "nvim/globals.h"
#include "nvim/indent.h"
#include "nvim/indent_c.h"
#include "nvim/keycodes.h"
#include "nvim/macros_defs.h"
#include "nvim/mark_defs.h"
#include "nvim/math.h"
#include "nvim/mbyte.h"
#include "nvim/memline.h"
#include "nvim/memory.h"
#include "nvim/option.h"
#include "nvim/option_vars.h"
#include "nvim/plines.h"
#include "nvim/pos_defs.h"
#include "nvim/search.h"
#include "nvim/state_defs.h"
#include "nvim/strings.h"
#include "nvim/types_defs.h"
#include "nvim/vim_defs.h"

// Find result cache for cpp_baseclass
typedef struct {
  int found;
  lpos_T lpos;
} cpp_baseclass_cache_T;

#include "indent_c.c.generated.h"
// Find the start of a comment, not knowing if we are in a comment right now.
// Search starts at w_cursor.lnum and goes backwards.
// Return NULL when not inside a comment.
static pos_T *ind_find_start_comment(void)  // XXX
{
  return find_start_comment(curbuf->b_ind_maxcomment);
}

pos_T *find_start_comment(int ind_maxcomment)  // XXX
{
  pos_T *pos;
  int64_t cur_maxcomment = ind_maxcomment;

  while (true) {
    pos = findmatchlimit(NULL, '*', FM_BACKWARD, cur_maxcomment);
    if (pos == NULL) {
      break;
    }

    // Check if the comment start we found is inside a string.
    // If it is then restrict the search to below this line and try again.
    if (!is_pos_in_string(ml_get(pos->lnum), pos->col)) {
      break;
    }
    cur_maxcomment = curwin->w_cursor.lnum - pos->lnum - 1;
    if (cur_maxcomment <= 0) {
      pos = NULL;
      break;
    }
  }
  return pos;
}

/// Find the start of a comment or raw string, not knowing if we are in a
/// comment or raw string right now.
/// Search starts at w_cursor.lnum and goes backwards.
/// If is_raw is given and returns start of raw_string, sets it to true.
///
/// @returns NULL when not inside a comment or raw string.
///
/// @note "CORS" -> Comment Or Raw String
static pos_T *ind_find_start_CORS(linenr_T *is_raw)
{
  // XXX
  static pos_T comment_pos_copy;

  pos_T *comment_pos = find_start_comment(curbuf->b_ind_maxcomment);
  if (comment_pos != NULL) {
    // Need to make a copy of the static pos in findmatchlimit(),
    // calling find_start_rawstring() may change it.
    comment_pos_copy = *comment_pos;
    comment_pos = &comment_pos_copy;
  }
  pos_T *rs_pos = find_start_rawstring(curbuf->b_ind_maxcomment);

  // If comment_pos is before rs_pos the raw string is inside the comment.
  // If rs_pos is before comment_pos the comment is inside the raw string.
  if (comment_pos == NULL || (rs_pos != NULL && lt(*rs_pos, *comment_pos))) {
    if (is_raw != NULL && rs_pos != NULL) {
      *is_raw = rs_pos->lnum;
    }
    return rs_pos;
  }
  return comment_pos;
}

// Find the start of a raw string, not knowing if we are in one right now.
// Search starts at w_cursor.lnum and goes backwards.
// Return NULL when not inside a raw string.
static pos_T *find_start_rawstring(int ind_maxcomment)  // XXX
{
  pos_T *pos;
  int cur_maxcomment = ind_maxcomment;

  while (true) {
    pos = findmatchlimit(NULL, 'R', FM_BACKWARD, cur_maxcomment);
    if (pos == NULL) {
      break;
    }

    // Check if the raw string start we found is inside a string.
    // If it is then restrict the search to below this line and try again.
    if (!is_pos_in_string(ml_get(pos->lnum), pos->col)) {
      break;
    }
    cur_maxcomment = curwin->w_cursor.lnum - pos->lnum - 1;
    if (cur_maxcomment <= 0) {
      pos = NULL;
      break;
    }
  }
  return pos;
}

// Skip to the end of a "string" and a 'c' character.
// If there is no string or character, return argument unmodified.
static const char *skip_string(const char *p)
{
  int i;

  // We loop, because strings may be concatenated: "date""time".
  for (;; p++) {
    if (p[0] == '\'') {                     // 'c' or '\n' or '\000'
      if (p[1] == NUL) {                    // ' at end of line
        break;
      }
      i = 2;
      if (p[1] == '\\' && p[2] != NUL) {    // '\n' or '\000'
        i++;
        while (ascii_isdigit(p[i - 1])) {   // '\000'
          i++;
        }
      }
      if (p[i - 1] != NUL && p[i] == '\'') {  // check for trailing '
        p += i;
        continue;
      }
    } else if (p[0] == '"') {             // start of string
      for (++p; p[0]; p++) {
        if (p[0] == '\\' && p[1] != NUL) {
          p++;
        } else if (p[0] == '"') {         // end of string
          break;
        }
      }
      if (p[0] == '"') {
        continue;  // continue for another string
      }
    } else if (p[0] == 'R' && p[1] == '"') {
      // Raw string: R"[delim](...)[delim]"
      const char *delim = p + 2;
      const char *paren = vim_strchr(delim, '(');

      if (paren != NULL) {
        const ptrdiff_t delim_len = paren - delim;

        for (p += 3; *p; p++) {
          if (p[0] == ')' && strncmp(p + 1, delim, (size_t)delim_len) == 0
              && p[delim_len + 1] == '"') {
            p += delim_len + 1;
            break;
          }
        }
        if (p[0] == '"') {
          continue;  // continue for another string
        }
      }
    }
    break;                                  // no string found
  }
  if (!*p) {
    p--;                                    // backup from NUL
  }
  return p;
}

/// @returns true if "line[col]" is inside a C string.
int is_pos_in_string(const char *line, colnr_T col)
{
  const char *p;

  for (p = line; *p && (colnr_T)(p - line) < col; p++) {
    p = skip_string(p);
  }
  return !((colnr_T)(p - line) <= col);
}

// Functions for C-indenting.
// Most of this originally comes from Eric Fischer.

// Below "XXX" means that this function may unlock the current line.

/// @return  true if the string "line" starts with a word from 'cinwords'.
bool cin_is_cinword(const char *line)
{
  bool retval = false;

  size_t cinw_len = strlen(curbuf->b_p_cinw) + 1;
  char *cinw_buf = xmalloc(cinw_len);
  line = skipwhite(line);

  for (char *cinw = curbuf->b_p_cinw; *cinw;) {
    size_t len = copy_option_part(&cinw, cinw_buf, cinw_len, ",");
    if (strncmp(line, cinw_buf, len) == 0
        && (!vim_iswordc((uint8_t)line[len]) || !vim_iswordc((uint8_t)line[len - 1]))) {
      retval = true;
      break;
    }
  }

  xfree(cinw_buf);

  return retval;
}

/// Check that C-indenting is on.
bool cindent_on(void)
  FUNC_ATTR_PURE FUNC_ATTR_WARN_UNUSED_RESULT
{
  return !p_paste && (curbuf->b_p_cin || *curbuf->b_p_inde != NUL);
}

// Skip over white space and C comments within the line.
// Also skip over Perl/shell comments if desired.
static const char *cin_skipcomment(const char *s)
{
  while (*s) {
    const char *prev_s = s;

    s = skipwhite(s);

    // Perl/shell # comment comment continues until eol.  Require a space
    // before # to avoid recognizing $#array.
    if (curbuf->b_ind_hash_comment != 0 && s != prev_s && *s == '#') {
      s += strlen(s);
      break;
    }
    if (*s != '/') {
      break;
    }
    s++;
    if (*s == '/') {            // slash-slash comment continues till eol
      s += strlen(s);
      break;
    }
    if (*s != '*') {
      break;
    }
    for (++s; *s; s++) {        // skip slash-star comment
      if (s[0] == '*' && s[1] == '/') {
        s += 2;
        break;
      }
    }
  }
  return s;
}

/// Return true if there is no code at *s.  White space and comments are
/// not considered code.
static int cin_nocode(const char *s)
{
  return *cin_skipcomment(s) == NUL;
}

// Check previous lines for a "//" line comment, skipping over blank lines.
static pos_T *find_line_comment(void)  // XXX
{
  static pos_T pos;
  char *line;
  char *p;

  pos = curwin->w_cursor;
  while (--pos.lnum > 0) {
    line = ml_get(pos.lnum);
    p = skipwhite(line);
    if (cin_islinecomment(p)) {
      pos.col = (int)(p - line);
      return &pos;
    }
    if (*p != NUL) {
      break;
    }
  }
  return NULL;
}

/// Checks if `text` starts with "key:".
static bool cin_has_js_key(const char *text)
{
  const char *s = skipwhite(text);

  char quote = 0;
  if (*s == '\'' || *s == '"') {
    // can be 'key': or "key":
    quote = *s;
    s++;
  }
  if (!vim_isIDc((uint8_t)(*s))) {     // need at least one ID character
    return false;
  }

  while (vim_isIDc((uint8_t)(*s))) {
    s++;
  }
  if (*s && *s == quote) {
    s++;
  }

  s = cin_skipcomment(s);

  // "::" is not a label, it's C++
  return (*s == ':' && s[1] != ':');
}

/// Checks if string matches "label:"; move to character after ':' if true.
/// "*s" must point to the start of the label, if there is one.
static bool cin_islabel_skip(const char **s)
  FUNC_ATTR_NONNULL_ALL
{
  if (!vim_isIDc((uint8_t)(**s))) {            // need at least one ID character
    return false;
  }

  while (vim_isIDc((uint8_t)(**s))) {
    (*s) += utfc_ptr2len(*s);
  }

  *s = cin_skipcomment(*s);

  // "::" is not a label, it's C++
  return **s == ':' && *++*s != ':';
}

// Recognize a label: "label:".
// Note: curwin->w_cursor must be where we are looking for the label.
static bool cin_islabel(void)  // XXX
{
  const char *s = cin_skipcomment(get_cursor_line_ptr());

  // Exclude "default" from labels, since it should be indented
  // like a switch label.  Same for C++ scope declarations.
  if (cin_isdefault(s)) {
    return false;
  }
  if (cin_isscopedecl(s)) {
    return false;
  }

  if (!cin_islabel_skip(&s)) {
    return false;
  }

  // Only accept a label if the previous line is terminated or is a case
  // label.
  pos_T cursor_save;
  pos_T *trypos;
  const char *line;

  cursor_save = curwin->w_cursor;
  while (curwin->w_cursor.lnum > 1) {
    curwin->w_cursor.lnum--;

    // If we're in a comment or raw string now, skip to the start of
    // it.
    curwin->w_cursor.col = 0;
    if ((trypos = ind_find_start_CORS(NULL)) != NULL) {   // XXX
      curwin->w_cursor = *trypos;
    }

    line = get_cursor_line_ptr();
    if (cin_ispreproc(line)) {        // ignore #defines, #if, etc.
      continue;
    }
    if (*(line = cin_skipcomment(line)) == NUL) {
      continue;
    }

    curwin->w_cursor = cursor_save;
    if (cin_isterminated(line, true, false)
        || cin_isscopedecl(line)
        || cin_iscase(line, true)
        || (cin_islabel_skip(&line) && cin_nocode(line))) {
      return true;
    }
    return false;
  }
  curwin->w_cursor = cursor_save;
  return true;  // label at start of file???
}

/// Strings can be concatenated with comments between:
/// "string0" |*comment*| "string1"
static const char *cin_skip_comment_and_string(const char *s)
{
  const char *r = NULL, *p = s;
  do {
    r = p;
    p = cin_skipcomment(p);
    if (*p) {
      p = skip_string(p);
    }
  } while (p != r);
  return p;
}

/// Recognize structure or compound literal initialization:
/// =|return [&][(typecast)] [{]
/// The number of opening braces is arbitrary.
static bool cin_is_compound_init(const char *s)
{
  const char *p = s, *r = NULL;

  while (*p) {
    if (*p == '=') {
      p = r = cin_skipcomment(p + 1);
    } else if (!strncmp(p, "return", 6) && !vim_isIDc(p[6])
               && (p == s || (p > s && !vim_isIDc(p[-1])))) {
      p = r = cin_skipcomment(p + 6);
    } else {
      p = cin_skip_comment_and_string(p + 1);
    }
  }
  if (!r) {
    return false;
  }
  p = r;  // p points now after '=' or "return"

  if (cin_nocode(p)) {
    return true;
  }

  if (*p == '&') {
    p = cin_skipcomment(p + 1);
  }

  if (*p == '(') {  // skip a typecast
    int open_count = 1;
    do {
      p = cin_skip_comment_and_string(p + 1);
      if (cin_nocode(p)) {
        return true;
      }
      open_count += (*p == '(') - (*p == ')');
    } while (open_count);
    p = cin_skipcomment(p + 1);
    if (cin_nocode(p)) {
      return true;
    }
  }

  while (*p == '{') {
    p = cin_skipcomment(p + 1);
  }
  return cin_nocode(p);
}

/// Recognize enumerations:
/// "[typedef] [static|public|protected|private] enum"
/// Calls another function to recognize structure initialization.
static bool cin_isinit(void)
{
  const char *s;
  static char *skip[] = { "static", "public", "protected", "private" };

  s = cin_skipcomment(get_cursor_line_ptr());

  if (cin_starts_with(s, "typedef")) {
    s = cin_skipcomment(s + 7);
  }

  while (true) {
    int i, l;

    for (i = 0; i < (int)ARRAY_SIZE(skip); i++) {
      l = (int)strlen(skip[i]);
      if (cin_starts_with(s, skip[i])) {
        s = cin_skipcomment(s + l);
        l = 0;
        break;
      }
    }
    if (l != 0) {
      break;
    }
  }

  if (cin_starts_with(s, "enum")) {
    return true;
  }

  return cin_is_compound_init(s);
}

/// Recognize a switch label: "case .*:" or "default:".
///
/// @param strict  Allow relaxed check of case statement for JS
static bool cin_iscase(const char *s, bool strict)
{
  s = cin_skipcomment(s);
  if (cin_starts_with(s, "case")) {
    for (s += 4; *s; s++) {
      s = cin_skipcomment(s);
      if (*s == NUL) {
        break;
      }
      if (*s == ':') {
        if (s[1] == ':') {              // skip over "::" for C++
          s++;
        } else {
          return true;
        }
      }
      if (*s == '\'' && s[1] && s[2] == '\'') {
        s += 2;                         // skip over ':'
      } else if (*s == '/' && (s[1] == '*' || s[1] == '/')) {
        return false;                   // stop at comment
      } else if (*s == '"') {
        // JS etc.
        if (strict) {
          return false;                 // stop at string
        }
        return true;
      }
    }
    return false;
  }

  if (cin_isdefault(s)) {
    return true;
  }
  return false;
}

// Recognize a "default" switch label.
static int cin_isdefault(const char *s)
{
  return strncmp(s, "default", 7) == 0
         && *(s = cin_skipcomment(s + 7)) == ':'
         && s[1] != ':';
}

/// Recognize a scope declaration label from the 'cinscopedecls' option.
static bool cin_isscopedecl(const char *p)
{
  const char *s = cin_skipcomment(p);

  const size_t cinsd_len = strlen(curbuf->b_p_cinsd) + 1;
  char *cinsd_buf = xmalloc(cinsd_len);

  bool found = false;

  for (char *cinsd = curbuf->b_p_cinsd; *cinsd;) {
    const size_t len = copy_option_part(&cinsd, cinsd_buf, cinsd_len, ",");
    if (strncmp(s, cinsd_buf, len) == 0) {
      const char *skip = cin_skipcomment(s + len);
      if (*skip == ':' && skip[1] != ':') {
        found = true;
        break;
      }
    }
  }

  xfree(cinsd_buf);

  return found;
}

// Maximum number of lines to search back for a "namespace" line.
#define FIND_NAMESPACE_LIM 20

// Recognize a "namespace" scope declaration.
static bool cin_is_cpp_namespace(const char *s)
{
  const char *p;
  bool has_name = false;
  bool has_name_start = false;

  s = cin_skipcomment(s);

  // skip over "inline" and "export" in any order
  while ((strncmp(s, "inline", 6) == 0 || strncmp(s, "export", 6) == 0)
         && (s[6] == NUL || !vim_iswordc((uint8_t)s[6]))) {
    s = cin_skipcomment(skipwhite(s + 6));
  }

  if (strncmp(s, "namespace", 9) == 0 && (s[9] == NUL || !vim_iswordc((uint8_t)s[9]))) {
    p = cin_skipcomment(skipwhite(s + 9));
    while (*p != NUL) {
      if (ascii_iswhite(*p)) {
        has_name = true;         // found end of a name
        p = cin_skipcomment(skipwhite(p));
      } else if (*p == '{') {
        break;
      } else if (vim_iswordc((uint8_t)(*p))) {
        has_name_start = true;
        if (has_name) {
          return false;           // word character after skipping past name
        }
        p++;
      } else if (p[0] == ':' && p[1] == ':' && vim_iswordc((uint8_t)p[2])) {
        if (!has_name_start || has_name) {
          return false;
        }
        // C++ 17 nested namespace
        p += 3;
      } else {
        return false;
      }
    }
    return true;
  }
  return false;
}

// Return a pointer to the first non-empty non-comment character after a ':'.
// Return NULL if not found.
//        case 234:    a = b;
//                     ^
static const char *after_label(const char *l)
{
  for (; *l; l++) {
    if (*l == ':') {
      if (l[1] == ':') {            // skip over "::" for C++
        l++;
      } else if (!cin_iscase(l + 1, false)) {
        break;
      }
    } else if (*l == '\'' && l[1] && l[2] == '\'') {
      l += 2;                       // skip over 'x'
    }
  }
  if (*l == NUL) {
    return NULL;
  }
  l = cin_skipcomment(l + 1);
  if (*l == NUL) {
    return NULL;
  }
  return l;
}

// Get indent of line "lnum", skipping a label.
// Return 0 if there is nothing after the label.
static int get_indent_nolabel(linenr_T lnum)  // XXX
{
  const char *l;
  pos_T fp;
  colnr_T col;
  const char *p;

  l = ml_get(lnum);
  p = after_label(l);
  if (p == NULL) {
    return 0;
  }

  fp.col = (colnr_T)(p - l);
  fp.lnum = lnum;
  getvcol(curwin, &fp, &col, NULL, NULL);
  return (int)col;
}

// Find indent for line "lnum", ignoring any case or jump label.
// Also return a pointer to the text (after the label) in "pp".
//   label:     if (asdf && asdfasdf)
//              ^
static int skip_label(linenr_T lnum, const char **pp)
{
  const char *l;
  int amount;
  pos_T cursor_save;

  cursor_save = curwin->w_cursor;
  curwin->w_cursor.lnum = lnum;
  l = get_cursor_line_ptr();
  // XXX
  if (cin_iscase(l, false) || cin_isscopedecl(l) || cin_islabel()) {
    amount = get_indent_nolabel(lnum);
    l = after_label(get_cursor_line_ptr());
    if (l == NULL) {            // just in case
      l = get_cursor_line_ptr();
    }
  } else {
    amount = get_indent();
    l = get_cursor_line_ptr();
  }
  *pp = l;

  curwin->w_cursor = cursor_save;
  return amount;
}

// Return the indent of the first variable name after a type in a declaration.
//  int     a,                  indent of "a"
//  static struct foo    b,     indent of "b"
//  enum bla    c,              indent of "c"
// Returns zero when it doesn't look like a declaration.
static int cin_first_id_amount(void)
{
  char *line, *p, *s;
  int len;
  pos_T fp;
  colnr_T col;

  line = get_cursor_line_ptr();
  p = skipwhite(line);
  len = (int)(skiptowhite(p) - p);
  if (len == 6 && strncmp(p, "static", 6) == 0) {
    p = skipwhite(p + 6);
    len = (int)(skiptowhite(p) - p);
  }
  if (len == 6 && strncmp(p, "struct", 6) == 0) {
    p = skipwhite(p + 6);
  } else if (len == 4 && strncmp(p, "enum", 4) == 0) {
    p = skipwhite(p + 4);
  } else if ((len == 8 && strncmp(p, "unsigned", 8) == 0)
             || (len == 6 && strncmp(p, "signed", 6) == 0)) {
    s = skipwhite(p + len);
    if ((strncmp(s, "int", 3) == 0 && ascii_iswhite(s[3]))
        || (strncmp(s, "long", 4) == 0 && ascii_iswhite(s[4]))
        || (strncmp(s, "short", 5) == 0 && ascii_iswhite(s[5]))
        || (strncmp(s, "char", 4) == 0 && ascii_iswhite(s[4]))) {
      p = s;
    }
  }
  for (len = 0; vim_isIDc((uint8_t)p[len]); len++) {}
  if (len == 0 || !ascii_iswhite(p[len]) || cin_nocode(p)) {
    return 0;
  }

  p = skipwhite(p + len);
  fp.lnum = curwin->w_cursor.lnum;
  fp.col = (colnr_T)(p - line);
  getvcol(curwin, &fp, &col, NULL, NULL);
  return (int)col;
}

// Return the indent of the first non-blank after an equal sign.
//       char *foo = "here";
// Return zero if no (useful) equal sign found.
// Return -1 if the line above "lnum" ends in a backslash.
//      foo = "asdf{backslash}
//             asdf{backslash}
//             here";
static int cin_get_equal_amount(linenr_T lnum)
{
  const char *line;
  const char *s;
  colnr_T col;
  pos_T fp;

  if (lnum > 1) {
    line = ml_get(lnum - 1);
    if (*line != NUL && line[strlen(line) - 1] == '\\') {
      return -1;
    }
  }

  s = ml_get(lnum);
  line = s;
  while (*s != NUL && vim_strchr("=;{}\"'", (uint8_t)(*s)) == NULL) {
    if (cin_iscomment(s)) {     // ignore comments
      s = cin_skipcomment(s);
    } else {
      s++;
    }
  }
  if (*s != '=') {
    return 0;
  }

  s = skipwhite(s + 1);
  if (cin_nocode(s)) {
    return 0;
  }

  if (*s == '"') {      // nice alignment for continued strings
    s++;
  }

  fp.lnum = lnum;
  fp.col = (colnr_T)(s - line);
  getvcol(curwin, &fp, &col, NULL, NULL);
  return (int)col;
}

// Recognize a preprocessor statement: Any line that starts with '#'.
static int cin_ispreproc(const char *s)
{
  if (*skipwhite(s) == '#') {
    return true;
  }
  return false;
}

/// Return true if line "*pp" at "*lnump" is a preprocessor statement or a
/// continuation line of a preprocessor statement.  Decrease "*lnump" to the
/// start and return the line in "*pp".
/// Put the amount of indent in "*amount".
static int cin_ispreproc_cont(const char **pp, linenr_T *lnump, int *amount)
{
  const char *line = *pp;
  linenr_T lnum = *lnump;
  int retval = false;
  int candidate_amount = *amount;

  if (*line != NUL && line[strlen(line) - 1] == '\\') {
    candidate_amount = get_indent_lnum(lnum);
  }

  while (true) {
    if (cin_ispreproc(line)) {
      retval = true;
      *lnump = lnum;
      break;
    }
    if (lnum == 1) {
      break;
    }
    line = ml_get(--lnum);
    if (*line == NUL || line[strlen(line) - 1] != '\\') {
      break;
    }
  }

  if (lnum != *lnump) {
    *pp = ml_get(*lnump);
  }
  if (retval) {
    *amount = candidate_amount;
  }
  return retval;
}

// Recognize the start of a C or C++ comment.
static int cin_iscomment(const char *p)
{
  return p[0] == '/' && (p[1] == '*' || p[1] == '/');
}

// Recognize the start of a "//" comment.
static int cin_islinecomment(const char *p)
{
  return p[0] == '/' && p[1] == '/';
}

/// Recognize a line that starts with '{' or '}', or ends with ';', ',', '{' or
/// '}'.
/// Don't consider "} else" a terminated line.
/// If a line begins with an "else", only consider it terminated if no unmatched
/// opening braces follow (handle "else { foo();" correctly).
///
/// @param incl_open   include '{' at the end as terminator
/// @param incl_comma  recognize a trailing comma
///
/// @return  the character terminating the line (ending char's have precedence if
///          both apply in order to determine initializations).
static char cin_isterminated(const char *s, int incl_open, int incl_comma)
{
  char found_start = 0;
  unsigned n_open = 0;
  int is_else = false;

  s = cin_skipcomment(s);

  if (*s == '{' || (*s == '}' && !cin_iselse(s))) {
    found_start = *s;
  }

  if (!found_start) {
    is_else = cin_iselse(s);
  }

  while (*s) {
    // skip over comments, "" strings and 'c'haracters
    s = skip_string(cin_skipcomment(s));
    if (*s == '}' && n_open > 0) {
      n_open--;
    }
    if ((!is_else || n_open == 0)
        && (*s == ';' || *s == '}' || (incl_comma && *s == ','))
        && cin_nocode(s + 1)) {
      return *s;
    } else if (*s == '{') {
      if (incl_open && cin_nocode(s + 1)) {
        return *s;
      } else {
        n_open++;
      }
    }

    if (*s) {
      s++;
    }
  }
  return found_start;
}

/// Recognizes the basic picture of a function declaration -- it needs to
/// have an open paren somewhere and a close paren at the end of the line and
/// no semicolons anywhere.
/// When a line ends in a comma we continue looking in the next line.
///
/// @param[in]  sp  Points to a string with the line. When looking at other
///                 lines it must be restored to the line. When it's NULL fetch
///                 lines here.
/// @param[in]  first_lnum Where to start looking.
/// @param[in]  min_lnum The line before which we will not be looking.
static int cin_isfuncdecl(const char **sp, linenr_T first_lnum, linenr_T min_lnum)
{
  const char *s;
  linenr_T lnum = first_lnum;
  linenr_T save_lnum = curwin->w_cursor.lnum;
  int retval = false;
  pos_T *trypos;
  int just_started = true;

  if (sp == NULL) {
    s = ml_get(lnum);
  } else {
    s = *sp;
  }

  curwin->w_cursor.lnum = lnum;
  if (find_last_paren(s, '(', ')')
      && (trypos = find_match_paren(curbuf->b_ind_maxparen)) != NULL) {
    lnum = trypos->lnum;
    if (lnum < min_lnum) {
      curwin->w_cursor.lnum = save_lnum;
      return false;
    }
    s = ml_get(lnum);
  }

  curwin->w_cursor.lnum = save_lnum;
  // Ignore line starting with #.
  if (cin_ispreproc(s)) {
    return false;
  }

  while (*s && *s != '(' && *s != ';' && *s != '\'' && *s != '"') {
    // ignore comments
    if (cin_iscomment(s)) {
      s = cin_skipcomment(s);
    } else if (*s == ':') {
      if (*(s + 1) == ':') {
        s += 2;
      } else {
        // To avoid a mistake in the following situation:
        // A::A(int a, int b)
        //     : a(0)  // <--not a function decl
        //     , b(0)
        // {...
        return false;
      }
    } else {
      s++;
    }
  }
  if (*s != '(') {
    return false;  // ';', ' or "  before any () or no '('
  }

  while (*s && *s != ';' && *s != '\'' && *s != '"') {
    if (*s == ')' && cin_nocode(s + 1)) {
      // ')' at the end: may have found a match
      // Check for the previous line not to end in a backslash:
      //       #if defined(x) && {backslash}
      //           defined(y)
      lnum = first_lnum - 1;
      s = ml_get(lnum);
      if (*s == NUL || s[strlen(s) - 1] != '\\') {
        retval = true;
      }
      goto done;
    }
    if ((*s == ',' && cin_nocode(s + 1)) || s[1] == NUL || cin_nocode(s)) {
      int comma = (*s == ',');

      // ',' at the end: continue looking in the next line.
      // At the end: check for ',' in the next line, for this style:
      // func(arg1
      //       , arg2)
      while (true) {
        if (lnum >= curbuf->b_ml.ml_line_count) {
          break;
        }
        s = ml_get(++lnum);
        if (!cin_ispreproc(s)) {
          break;
        }
      }
      if (lnum >= curbuf->b_ml.ml_line_count) {
        break;
      }
      // Require a comma at end of the line or a comma or ')' at the
      // start of next line.
      s = skipwhite(s);
      if (!just_started && (!comma && *s != ',' && *s != ')')) {
        break;
      }
      just_started = false;
    } else if (cin_iscomment(s)) {      // ignore comments
      s = cin_skipcomment(s);
    } else {
      s++;
      just_started = false;
    }
  }

done:
  if (lnum != first_lnum && sp != NULL) {
    *sp = ml_get(first_lnum);
  }

  return retval;
}

static int cin_isif(const char *p)
{
  return strncmp(p, "if", 2) == 0 && !vim_isIDc((uint8_t)p[2]);
}

static int cin_iselse(const char *p)
{
  if (*p == '}') {          // accept "} else"
    p = cin_skipcomment(p + 1);
  }
  return strncmp(p, "else", 4) == 0 && !vim_isIDc((uint8_t)p[4]);
}

static int cin_isdo(const char *p)
{
  return strncmp(p, "do", 2) == 0 && !vim_isIDc((uint8_t)p[2]);
}

// Check if this is a "while" that should have a matching "do".
// We only accept a "while (condition) ;", with only white space between the
// ')' and ';'. The condition may be spread over several lines.
static int cin_iswhileofdo(const char *p, linenr_T lnum)  // XXX
{
  pos_T cursor_save;
  pos_T *trypos;
  int retval = false;

  p = cin_skipcomment(p);
  if (*p == '}') {              // accept "} while (cond);"
    p = cin_skipcomment(p + 1);
  }
  if (cin_starts_with(p, "while")) {
    cursor_save = curwin->w_cursor;
    curwin->w_cursor.lnum = lnum;
    curwin->w_cursor.col = 0;
    p = get_cursor_line_ptr();
    while (*p && *p != 'w') {   // skip any '}', until the 'w' of the "while"
      p++;
      curwin->w_cursor.col++;
    }
    if ((trypos = findmatchlimit(NULL, 0, 0, curbuf->b_ind_maxparen)) != NULL
        && *cin_skipcomment(ml_get_pos(trypos) + 1) == ';') {
      retval = true;
    }
    curwin->w_cursor = cursor_save;
  }
  return retval;
}

// Check whether in "p" there is an "if", "for" or "while" before "*poffset".
// Return 0 if there is none.
// Otherwise return !0 and update "*poffset" to point to the place where the
// string was found.
static int cin_is_if_for_while_before_offset(const char *line, int *poffset)
{
  int offset = *poffset;

  if (offset-- < 2) {
    return 0;
  }
  while (offset > 2 && ascii_iswhite(line[offset])) {
    offset--;
  }

  offset -= 1;
  if (!strncmp(line + offset, "if", 2)) {
    goto probablyFound;
  }

  if (offset >= 1) {
    offset -= 1;
    if (!strncmp(line + offset, "for", 3)) {
      goto probablyFound;
    }

    if (offset >= 2) {
      offset -= 2;
      if (!strncmp(line + offset, "while", 5)) {
        goto probablyFound;
      }
    }
  }
  return 0;

probablyFound:
  if (!offset || !vim_isIDc((uint8_t)line[offset - 1])) {
    *poffset = offset;
    return 1;
  }
  return 0;
}

/// Return true if we are at the end of a do-while.
///    do
///       nothing;
///    while (foo
///             && bar);  <-- here
/// Adjust the cursor to the line with "while".
static int cin_iswhileofdo_end(int terminated)
{
  const char *line;
  const char *p;
  const char *s;
  pos_T *trypos;
  int i;

  if (terminated != ';') {      // there must be a ';' at the end
    return false;
  }

  p = line = get_cursor_line_ptr();
  while (*p != NUL) {
    p = cin_skipcomment(p);
    if (*p == ')') {
      s = skipwhite(p + 1);
      if (*s == ';' && cin_nocode(s + 1)) {
        // Found ");" at end of the line, now check there is "while"
        // before the matching '('.  XXX
        i = (int)(p - line);
        curwin->w_cursor.col = i;
        trypos = find_match_paren(curbuf->b_ind_maxparen);
        if (trypos != NULL) {
          s = cin_skipcomment(ml_get(trypos->lnum));
          if (*s == '}') {                      // accept "} while (cond);"
            s = cin_skipcomment(s + 1);
          }
          if (cin_starts_with(s, "while")) {
            curwin->w_cursor.lnum = trypos->lnum;
            return true;
          }
        }

        // Searching may have made "line" invalid, get it again.
        line = get_cursor_line_ptr();
        p = line + i;
      }
    }
    if (*p != NUL) {
      p++;
    }
  }
  return false;
}

static int cin_isbreak(const char *p)
{
  return strncmp(p, "break", 5) == 0 && !vim_isIDc((uint8_t)p[5]);
}

// Find the position of a C++ base-class declaration or
// constructor-initialization. eg:
//
// class MyClass :
//      baseClass               <-- here
// class MyClass : public baseClass,
//      anotherBaseClass        <-- here (should probably lineup ??)
// MyClass::MyClass(...) :
//      baseClass(...)          <-- here (constructor-initialization)
//
// This is a lot of guessing.  Watch out for "cond ? func() : foo".
static int cin_is_cpp_baseclass(cpp_baseclass_cache_T *cached)
{
  lpos_T *pos = &cached->lpos;  // find position
  const char *s;
  int class_or_struct, lookfor_ctor_init, cpp_base_class;
  linenr_T lnum = curwin->w_cursor.lnum;
  const char *line = get_cursor_line_ptr();

  if (pos->lnum <= lnum) {
    return cached->found;  // Use the cached result
  }

  pos->col = 0;

  s = skipwhite(line);
  if (*s == '#') {              // skip #define FOO x ? (x) : x
    return false;
  }
  s = cin_skipcomment(s);
  if (*s == NUL) {
    return false;
  }

  cpp_base_class = lookfor_ctor_init = class_or_struct = false;

  // Search for a line starting with '#', empty, ending in ';' or containing
  // '{' or '}' and start below it.  This handles the following situations:
  //    a = cond ?
  //          func() :
  //               asdf;
  //    func::foo()
  //          : something
  //    {}
  //    Foo::Foo (int one, int two)
  //            : something(4),
  //            somethingelse(3)
  //    {}
  while (lnum > 1) {
    line = ml_get(lnum - 1);
    s = skipwhite(line);
    if (*s == '#' || *s == NUL) {
      break;
    }
    while (*s != NUL) {
      s = cin_skipcomment(s);
      if (*s == '{' || *s == '}'
          || (*s == ';' && cin_nocode(s + 1))) {
        break;
      }
      if (*s != NUL) {
        s++;
      }
    }
    if (*s != NUL) {
      break;
    }
    lnum--;
  }

  pos->lnum = lnum;
  line = ml_get(lnum);
  s = line;
  while (true) {
    if (*s == NUL) {
      if (lnum == curwin->w_cursor.lnum) {
        break;
      }
      // Continue in the cursor line.
      line = ml_get(++lnum);
      s = line;
    }
    if (s == line) {
      // don't recognize "case (foo):" as a baseclass
      if (cin_iscase(s, false)) {
        break;
      }
      s = cin_skipcomment(line);
      if (*s == NUL) {
        continue;
      }
    }

    if (s[0] == '"' || (s[0] == 'R' && s[1] == '"')) {
      s = skip_string(s) + 1;
    } else if (s[0] == ':') {
      if (s[1] == ':') {
        // skip double colon. It can't be a constructor
        // initialization any more
        lookfor_ctor_init = false;
        s = cin_skipcomment(s + 2);
      } else if (lookfor_ctor_init || class_or_struct) {
        // we have something found, that looks like the start of
        // cpp-base-class-declaration or constructor-initialization
        cpp_base_class = true;
        lookfor_ctor_init = class_or_struct = false;
        pos->col = 0;
        s = cin_skipcomment(s + 1);
      } else {
        s = cin_skipcomment(s + 1);
      }
    } else if ((strncmp(s, "class", 5) == 0 && !vim_isIDc((uint8_t)s[5]))
               || (strncmp(s, "struct", 6) == 0 && !vim_isIDc((uint8_t)s[6]))) {
      class_or_struct = true;
      lookfor_ctor_init = false;

      if (*s == 'c') {
        s = cin_skipcomment(s + 5);
      } else {
        s = cin_skipcomment(s + 6);
      }
    } else {
      if (s[0] == '{' || s[0] == '}' || s[0] == ';') {
        cpp_base_class = lookfor_ctor_init = class_or_struct = false;
      } else if (s[0] == ')') {
        // Constructor-initialization is assumed if we come across
        // something like "):"
        class_or_struct = false;
        lookfor_ctor_init = true;
      } else if (s[0] == '?') {
        // Avoid seeing '() :' after '?' as constructor init.
        return false;
      } else if (!vim_isIDc((uint8_t)s[0])) {
        // if it is not an identifier, we are wrong
        class_or_struct = false;
        lookfor_ctor_init = false;
      } else if (pos->col == 0) {
        // it can't be a constructor-initialization any more
        lookfor_ctor_init = false;

        // the first statement starts here: lineup with this one...
        if (cpp_base_class) {
          pos->col = (colnr_T)(s - line);
        }
      }

      // When the line ends in a comma don't align with it.
      if (lnum == curwin->w_cursor.lnum && *s == ',' && cin_nocode(s + 1)) {
        pos->col = 0;
      }

      s = cin_skipcomment(s + 1);
    }
  }

  cached->found = cpp_base_class;
  if (cpp_base_class) {
    pos->lnum = lnum;
  }
  return cpp_base_class;
}

static int get_baseclass_amount(int col)
{
  int amount;
  colnr_T vcol;
  pos_T *trypos;

  if (col == 0) {
    amount = get_indent();
    if (find_last_paren(get_cursor_line_ptr(), '(', ')')
        && (trypos = find_match_paren(curbuf->b_ind_maxparen)) != NULL) {
      amount = get_indent_lnum(trypos->lnum);       // XXX
    }
    if (!cin_ends_in(get_cursor_line_ptr(), ",")) {
      amount += curbuf->b_ind_cpp_baseclass;
    }
  } else {
    curwin->w_cursor.col = col;
    getvcol(curwin, &curwin->w_cursor, &vcol, NULL, NULL);
    amount = (int)vcol;
  }
  if (amount < curbuf->b_ind_cpp_baseclass) {
    amount = curbuf->b_ind_cpp_baseclass;
  }
  return amount;
}

/// Return true if string "s" ends with the string "find", possibly followed by
/// white space and comments.  Skip strings and comments.
static int cin_ends_in(const char *s, const char *find)
{
  const char *p = s;
  const char *r;
  int len = (int)strlen(find);

  while (*p != NUL) {
    p = cin_skipcomment(p);
    if (strncmp(p, find, (size_t)len) == 0) {
      r = skipwhite(p + len);
      if (cin_nocode(r)) {
        return true;
      }
    }
    if (*p != NUL) {
      p++;
    }
  }
  return false;
}

/// Return true when "s" starts with "word" and then a non-ID character.
static int cin_starts_with(const char *s, const char *word)
{
  size_t l = strlen(word);

  return strncmp(s, word, l) == 0 && !vim_isIDc((uint8_t)s[l]);
}

/// Recognize a `extern "C"` or `extern "C++"` linkage specifications.
static int cin_is_cpp_extern_c(const char *s)
{
  const char *p;
  int has_string_literal = false;

  s = cin_skipcomment(s);
  if (strncmp(s, "extern", 6) == 0 && (s[6] == NUL || !vim_iswordc((uint8_t)s[6]))) {
    p = cin_skipcomment(skipwhite(s + 6));
    while (*p != NUL) {
      if (ascii_iswhite(*p)) {
        p = cin_skipcomment(skipwhite(p));
      } else if (*p == '{') {
        break;
      } else if (p[0] == '"' && p[1] == 'C' && p[2] == '"') {
        if (has_string_literal) {
          return false;
        }
        has_string_literal = true;
        p += 3;
      } else if (p[0] == '"' && p[1] == 'C' && p[2] == '+' && p[3] == '+'
                 && p[4] == '"') {
        if (has_string_literal) {
          return false;
        }
        has_string_literal = true;
        p += 5;
      } else {
        return false;
      }
    }
    return has_string_literal ? true : false;
  }
  return false;
}

// Skip strings, chars and comments until at or past "trypos".
// Return the column found.
static int cin_skip2pos(pos_T *trypos)
{
  const char *line;
  const char *p;
  const char *new_p;

  line = ml_get(trypos->lnum);
  p = line;
  while (*p && (colnr_T)(p - line) < trypos->col) {
    if (cin_iscomment(p)) {
      p = cin_skipcomment(p);
    } else {
      new_p = skip_string(p);
      if (new_p == p) {
        p++;
      } else {
        p = new_p;
      }
    }
  }
  return (int)(p - line);
}

// Find the '{' at the start of the block we are in.
// Return NULL if no match found.
// Ignore a '{' that is in a comment, makes indenting the next three lines
// work.
// foo()
// {
// }

static pos_T *find_start_brace(void)  // XXX
{
  pos_T cursor_save;
  pos_T *trypos;
  pos_T *pos;
  static pos_T pos_copy;

  cursor_save = curwin->w_cursor;
  while ((trypos = findmatchlimit(NULL, '{', FM_BLOCKSTOP, 0)) != NULL) {
    pos_copy = *trypos;         // copy pos_T, next findmatch will change it
    trypos = &pos_copy;
    curwin->w_cursor = *trypos;
    pos = NULL;
    // ignore the { if it's in a // or / *  * / comment
    if ((colnr_T)cin_skip2pos(trypos) == trypos->col
        && (pos = ind_find_start_CORS(NULL)) == NULL) {   // XXX
      break;
    }
    if (pos != NULL) {
      curwin->w_cursor = *pos;
    }
  }
  curwin->w_cursor = cursor_save;
  return trypos;
}

/// Find the matching '(', ignoring it if it is in a comment.
/// @returns NULL or the found match.
static pos_T *find_match_paren(int ind_maxparen)
{
  return find_match_char('(', ind_maxparen);
}

static pos_T *find_match_char(char c, int ind_maxparen)
{
  pos_T cursor_save;
  pos_T *trypos;
  static pos_T pos_copy;
  int ind_maxp_wk;

  cursor_save = curwin->w_cursor;
  ind_maxp_wk = ind_maxparen;
retry:
  if ((trypos = findmatchlimit(NULL, (uint8_t)c, 0, ind_maxp_wk)) != NULL) {
    // check if the ( is in a // comment
    if ((colnr_T)cin_skip2pos(trypos) > trypos->col) {
      ind_maxp_wk = ind_maxparen - (cursor_save.lnum - trypos->lnum);
      if (ind_maxp_wk > 0) {
        curwin->w_cursor = *trypos;
        curwin->w_cursor.col = 0;  // XXX
        goto retry;
      }
      trypos = NULL;
    } else {
      pos_T *trypos_wk;

      pos_copy = *trypos;           // copy trypos, findmatch will change it
      trypos = &pos_copy;
      curwin->w_cursor = *trypos;
      if ((trypos_wk = ind_find_start_CORS(NULL)) != NULL) {  // XXX
        ind_maxp_wk = ind_maxparen - (cursor_save.lnum - trypos_wk->lnum);
        if (ind_maxp_wk > 0) {
          curwin->w_cursor = *trypos_wk;
          goto retry;
        }
        trypos = NULL;
      }
    }
  }
  curwin->w_cursor = cursor_save;
  return trypos;
}

/// Find the matching '(', ignoring it if it is in a comment or before an
/// unmatched {.
/// @returns NULL or the found match.
static pos_T *find_match_paren_after_brace(int ind_maxparen)
{
  pos_T *trypos = find_match_paren(ind_maxparen);
  if (trypos == NULL) {
    return NULL;
  }

  pos_T *tryposBrace = find_start_brace();
  // If both an unmatched '(' and '{' is found.  Ignore the '('
  // position if the '{' is further down.
  if (tryposBrace != NULL
      && (trypos->lnum != tryposBrace->lnum
          ? trypos->lnum < tryposBrace->lnum
          : trypos->col < tryposBrace->col)) {
    trypos = NULL;
  }
  return trypos;
}

// Return ind_maxparen corrected for the difference in line number between the
// cursor position and "startpos".  This makes sure that searching for a
// matching paren above the cursor line doesn't find a match because of
// looking a few lines further.
static int corr_ind_maxparen(pos_T *startpos)
{
  int n = startpos->lnum - curwin->w_cursor.lnum;

  if (n > 0 && n < curbuf->b_ind_maxparen / 2) {
    return curbuf->b_ind_maxparen - n;
  }
  return curbuf->b_ind_maxparen;
}

// Set w_cursor.col to the column number of the last unmatched ')' or '{' in
// line "l".  "l" must point to the start of the line.
static int find_last_paren(const char *l, char start, char end)
{
  int i;
  int retval = false;
  int open_count = 0;

  curwin->w_cursor.col = 0;                 // default is start of line

  for (i = 0; l[i] != NUL; i++) {
    i = (int)(cin_skipcomment(l + i) - l);     // ignore parens in comments
    i = (int)(skip_string(l + i) - l);        // ignore parens in quotes
    if (l[i] == start) {
      open_count++;
    } else if (l[i] == end) {
      if (open_count > 0) {
        open_count--;
      } else {
        curwin->w_cursor.col = i;
        retval = true;
      }
    }
  }
  return retval;
}

// Parse 'cinoptions' and set the values in "curbuf".
// Must be called when 'cinoptions', 'shiftwidth' and/or 'tabstop' changes.
void parse_cino(buf_T *buf)
{
  char *p;
  char *l;
  int divider;
  int fraction = 0;
  int sw = get_sw_value(buf);

  // Set the default values.
  // Spaces from a block's opening brace the prevailing indent for that
  // block should be.
  buf->b_ind_level = sw;

  // Spaces from the edge of the line an open brace that's at the end of a
  // line is imagined to be.
  buf->b_ind_open_imag = 0;

  // Spaces from the prevailing indent for a line that is not preceded by
  // an opening brace.
  buf->b_ind_no_brace = 0;

  // Column where the first { of a function should be located }.
  buf->b_ind_first_open = 0;

  // Spaces from the prevailing indent a leftmost open brace should be
  // located.
  buf->b_ind_open_extra = 0;

  // Spaces from the matching open brace (real location for one at the left
  // edge; imaginary location from one that ends a line) the matching close
  // brace should be located.
  buf->b_ind_close_extra = 0;

  // Spaces from the edge of the line an open brace sitting in the leftmost
  // column is imagined to be.
  buf->b_ind_open_left_imag = 0;

  // Spaces jump labels should be shifted to the left if N is non-negative,
  // otherwise the jump label will be put to column 1.
  buf->b_ind_jump_label = -1;

  // Spaces from the switch() indent a "case xx" label should be located.
  buf->b_ind_case = sw;

  // Spaces from the "case xx:" code after a switch() should be located.
  buf->b_ind_case_code = sw;

  // Lineup break at end of case in switch() with case label.
  buf->b_ind_case_break = 0;

  // Spaces from the class declaration indent a scope declaration label
  // should be located.
  buf->b_ind_scopedecl = sw;

  // Spaces from the scope declaration label code should be located.
  buf->b_ind_scopedecl_code = sw;

  // Amount K&R-style parameters should be indented.
  buf->b_ind_param = sw;

  // Amount a function type spec should be indented.
  buf->b_ind_func_type = sw;

  // Amount a cpp base class declaration or constructor initialization
  // should be indented.
  buf->b_ind_cpp_baseclass = sw;

  // additional spaces beyond the prevailing indent a continuation line
  // should be located.
  buf->b_ind_continuation = sw;

  // Spaces from the indent of the line with an unclosed parentheses.
  buf->b_ind_unclosed = sw * 2;

  // Spaces from the indent of the line with an unclosed parentheses, which
  // itself is also unclosed.
  buf->b_ind_unclosed2 = sw;

  // Suppress ignoring spaces from the indent of a line starting with an
  // unclosed parenthesis.
  buf->b_ind_unclosed_noignore = 0;

  // If the opening paren is the last nonwhite character on the line, and
  // b_ind_unclosed_wrapped is nonzero, use this indent relative to the outer
  // context (for very long lines).
  buf->b_ind_unclosed_wrapped = 0;

  // Suppress ignoring white space when lining up with the character after
  // an unclosed parentheses.
  buf->b_ind_unclosed_whiteok = 0;

  // Indent a closing parenthesis under the line start of the matching
  // opening parenthesis.
  buf->b_ind_matching_paren = 0;

  // Indent a closing parenthesis under the previous line.
  buf->b_ind_paren_prev = 0;

  // Extra indent for comments.
  buf->b_ind_comment = 0;

  // Spaces from the comment opener when there is nothing after it.
  buf->b_ind_in_comment = 3;

  // Boolean: if non-zero, use b_ind_in_comment even if there is something
  // after the comment opener.
  buf->b_ind_in_comment2 = 0;

  // Max lines to search for an open paren.
  buf->b_ind_maxparen = 20;

  // Max lines to search for an open comment.
  buf->b_ind_maxcomment = 70;

  // Handle braces for java code.
  buf->b_ind_java = 0;

  // Not to confuse JS object properties with labels.
  buf->b_ind_js = 0;

  // Handle blocked cases correctly.
  buf->b_ind_keep_case_label = 0;

  // Handle C++ namespace.
  buf->b_ind_cpp_namespace = 0;

  // Handle continuation lines containing conditions of if(), for() and
  // while().
  buf->b_ind_if_for_while = 0;

  // indentation for # comments
  buf->b_ind_hash_comment = 0;

  // Handle C++ extern "C" or "C++"
  buf->b_ind_cpp_extern_c = 0;

  // Handle C #pragma directives
  buf->b_ind_pragma = 0;

  for (p = buf->b_p_cino; *p;) {
    l = p++;
    if (*p == '-') {
      p++;
    }
    char *digits_start = p;   // remember where the digits start
    int64_t n = getdigits_int(&p, true, 0);
    divider = 0;
    if (*p == '.') {        // ".5s" means a fraction.
      fraction = atoi(++p);
      while (ascii_isdigit(*p)) {
        p++;
        if (divider) {
          divider *= 10;
        } else {
          divider = 10;
        }
      }
    }
    if (*p == 's') {        // "2s" means two times 'shiftwidth'.
      if (p == digits_start) {
        n = sw;             // just "s" is one 'shiftwidth'.
      } else {
        n *= sw;
        if (divider) {
          n += ((int64_t)sw * fraction + divider / 2) / divider;
        }
      }
      p++;
    }
    if (l[1] == '-') {
      n = -n;
    }

    n = trim_to_int(n);

    // When adding an entry here, also update the default 'cinoptions' in
    // doc/indent.txt, and add explanation for it!
    switch (*l) {
    case '>':
      buf->b_ind_level = (int)n;
      break;
    case 'e':
      buf->b_ind_open_imag = (int)n;
      break;
    case 'n':
      buf->b_ind_no_brace = (int)n;
      break;
    case 'f':
      buf->b_ind_first_open = (int)n;
      break;
    case '{':
      buf->b_ind_open_extra = (int)n;
      break;
    case '}':
      buf->b_ind_close_extra = (int)n;
      break;
    case '^':
      buf->b_ind_open_left_imag = (int)n;
      break;
    case 'L':
      buf->b_ind_jump_label = (int)n;
      break;
    case ':':
      buf->b_ind_case = (int)n;
      break;
    case '=':
      buf->b_ind_case_code = (int)n;
      break;
    case 'b':
      buf->b_ind_case_break = (int)n;
      break;
    case 'p':
      buf->b_ind_param = (int)n;
      break;
    case 't':
      buf->b_ind_func_type = (int)n;
      break;
    case '/':
      buf->b_ind_comment = (int)n;
      break;
    case 'c':
      buf->b_ind_in_comment = (int)n;
      break;
    case 'C':
      buf->b_ind_in_comment2 = (int)n;
      break;
    case 'i':
      buf->b_ind_cpp_baseclass = (int)n;
      break;
    case '+':
      buf->b_ind_continuation = (int)n;
      break;
    case '(':
      buf->b_ind_unclosed = (int)n;
      break;
    case 'u':
      buf->b_ind_unclosed2 = (int)n;
      break;
    case 'U':
      buf->b_ind_unclosed_noignore = (int)n;
      break;
    case 'W':
      buf->b_ind_unclosed_wrapped = (int)n;
      break;
    case 'w':
      buf->b_ind_unclosed_whiteok = (int)n;
      break;
    case 'm':
      buf->b_ind_matching_paren = (int)n;
      break;
    case 'M':
      buf->b_ind_paren_prev = (int)n;
      break;
    case ')':
      buf->b_ind_maxparen = (int)n;
      break;
    case '*':
      buf->b_ind_maxcomment = (int)n;
      break;
    case 'g':
      buf->b_ind_scopedecl = (int)n;
      break;
    case 'h':
      buf->b_ind_scopedecl_code = (int)n;
      break;
    case 'j':
      buf->b_ind_java = (int)n;
      break;
    case 'J':
      buf->b_ind_js = (int)n;
      break;
    case 'l':
      buf->b_ind_keep_case_label = (int)n;
      break;
    case '#':
      buf->b_ind_hash_comment = (int)n;
      break;
    case 'N':
      buf->b_ind_cpp_namespace = (int)n;
      break;
    case 'k':
      buf->b_ind_if_for_while = (int)n;
      break;
    case 'E':
      buf->b_ind_cpp_extern_c = (int)n;
      break;
    case 'P':
      buf->b_ind_pragma = (int)n;
      break;
    }
    if (*p == ',') {
      p++;
    }
  }
}

// Return the desired indent for C code.
// Return -1 if the indent should be left alone (inside a raw string).
int get_c_indent(void)
{
  pos_T cur_curpos;
  int amount;
  int scope_amount;
  int cur_amount = MAXCOL;
  colnr_T col;
  char *theline;
  char *linecopy;
  pos_T *trypos;
  pos_T *comment_pos;
  pos_T *tryposBrace = NULL;
  pos_T tryposCopy;
  pos_T our_paren_pos;
  char *start;
  int start_brace;
#define BRACE_IN_COL0           1           // '{' is in column 0
#define BRACE_AT_START          2           // '{' is at start of line
#define BRACE_AT_END            3           // '{' is at end of line
  linenr_T ourscope;
  const char *l;
  const char *look;
  char terminated;
  int lookfor;
#define LOOKFOR_INITIAL         0
#define LOOKFOR_IF              1
#define LOOKFOR_DO              2
#define LOOKFOR_CASE            3
#define LOOKFOR_ANY             4
#define LOOKFOR_TERM            5
#define LOOKFOR_UNTERM          6
#define LOOKFOR_SCOPEDECL       7
#define LOOKFOR_NOBREAK         8
#define LOOKFOR_CPP_BASECLASS   9
#define LOOKFOR_ENUM_OR_INIT    10
#define LOOKFOR_JS_KEY          11
#define LOOKFOR_COMMA           12

  int whilelevel;
  linenr_T lnum;
  int n;
  int lookfor_break;
  bool lookfor_cpp_namespace = false;
  int cont_amount = 0;              // amount for continuation line
  int original_line_islabel;
  int added_to_amount = 0;
  linenr_T raw_string_start = 0;
  cpp_baseclass_cache_T cache_cpp_baseclass = { false, { MAXLNUM, 0 } };

  // make a copy, value is changed below
  int ind_continuation = curbuf->b_ind_continuation;

  // remember where the cursor was when we started
  cur_curpos = curwin->w_cursor;

  // if we are at line 1 zero indent is fine, right?
  if (cur_curpos.lnum == 1) {
    return 0;
  }

  // Get a copy of the current contents of the line.
  // This is required, because only the most recent line obtained with
  // ml_get is valid!
  linecopy = xstrdup(ml_get(cur_curpos.lnum));

  // In insert mode and the cursor is on a ')' truncate the line at the
  // cursor position.  We don't want to line up with the matching '(' when
  // inserting new stuff.
  // For unknown reasons the cursor might be past the end of the line, thus
  // check for that.
  if ((State & MODE_INSERT)
      && curwin->w_cursor.col < (colnr_T)strlen(linecopy)
      && linecopy[curwin->w_cursor.col] == ')') {
    linecopy[curwin->w_cursor.col] = NUL;
  }

  theline = skipwhite(linecopy);

  // move the cursor to the start of the line

  curwin->w_cursor.col = 0;

  original_line_islabel = cin_islabel();    // XXX

  // If we are inside a raw string don't change the indent.
  // Ignore a raw string inside a comment.
  comment_pos = ind_find_start_comment();
  if (comment_pos != NULL) {
    // findmatchlimit() static pos is overwritten, make a copy
    tryposCopy = *comment_pos;
    comment_pos = &tryposCopy;
  }
  trypos = find_start_rawstring(curbuf->b_ind_maxcomment);
  if (trypos != NULL && (comment_pos == NULL || lt(*trypos, *comment_pos))) {
    amount = -1;
    goto laterend;
  }

  // #defines and so on go at the left when included in 'cinkeys',
  // excluding pragmas when customized in 'cinoptions'
  if (*theline == '#' && (*linecopy == '#' || in_cinkeys('#', ' ', true))) {
    const char *const directive = skipwhite(theline + 1);
    if (curbuf->b_ind_pragma == 0 || strncmp(directive, "pragma", 6) != 0) {
      amount = curbuf->b_ind_hash_comment;
      goto theend;
    }
  }

  // Is it a non-case label? Then that goes at the left margin too unless:
  //  - JS flag is set.
  //  - 'L' item has a positive value.
  if (original_line_islabel && !curbuf->b_ind_js && curbuf->b_ind_jump_label < 0) {
    amount = 0;
    goto theend;
  }
  // If we're inside a "//" comment and there is a "//" comment in a
  // previous line, lineup with that one.
  if (cin_islinecomment(theline)) {
    pos_T linecomment_pos;

    trypos = find_line_comment();  // XXX
    if (trypos == NULL && curwin->w_cursor.lnum > 1) {
      // There may be a statement before the comment, search from the end
      // of the line for a comment start.
      linecomment_pos.col = check_linecomment(ml_get(curwin->w_cursor.lnum - 1));
      if (linecomment_pos.col != MAXCOL) {
        trypos = &linecomment_pos;
        trypos->lnum = curwin->w_cursor.lnum - 1;
      }
    }
    if (trypos != NULL) {
      // find how indented the line beginning the comment is
      getvcol(curwin, trypos, &col, NULL, NULL);
      amount = col;
      goto theend;
    }
  }
  // If we're inside a comment and not looking at the start of the
  // comment, try using the 'comments' option.
  if (!cin_iscomment(theline) && comment_pos != NULL) {  // XXX
    int lead_start_len = 2;
    int lead_middle_len = 1;
    char lead_start[COM_MAX_LEN];             // start-comment string
    char lead_middle[COM_MAX_LEN];            // middle-comment string
    char lead_end[COM_MAX_LEN];               // end-comment string
    char *p;
    int start_align = 0;
    int start_off = 0;
    int done = false;

    // find how indented the line beginning the comment is
    getvcol(curwin, comment_pos, &col, NULL, NULL);
    amount = col;
    *lead_start = NUL;
    *lead_middle = NUL;

    p = curbuf->b_p_com;
    while (*p != NUL) {
      int align = 0;
      int off = 0;
      int what = 0;

      while (*p != NUL && *p != ':') {
        if (*p == COM_START || *p == COM_END || *p == COM_MIDDLE) {
          what = (unsigned char)(*p++);
        } else if (*p == COM_LEFT || *p == COM_RIGHT) {
          align = (unsigned char)(*p++);
        } else if (ascii_isdigit(*p) || *p == '-') {
          off = getdigits_int(&p, true, 0);
        } else {
          p++;
        }
      }

      if (*p == ':') {
        p++;
      }
      (void)copy_option_part(&p, lead_end, COM_MAX_LEN, ",");
      if (what == COM_START) {
        STRCPY(lead_start, lead_end);
        lead_start_len = (int)strlen(lead_start);
        start_off = off;
        start_align = align;
      } else if (what == COM_MIDDLE) {
        STRCPY(lead_middle, lead_end);
        lead_middle_len = (int)strlen(lead_middle);
      } else if (what == COM_END) {
        // If our line starts with the middle comment string, line it
        // up with the comment opener per the 'comments' option.
        if (strncmp(theline, lead_middle, (size_t)lead_middle_len) == 0
            && strncmp(theline, lead_end, strlen(lead_end)) != 0) {
          done = true;
          if (curwin->w_cursor.lnum > 1) {
            // If the start comment string matches in the previous
            // line, use the indent of that line plus offset.  If
            // the middle comment string matches in the previous
            // line, use the indent of that line.  XXX
            look = skipwhite(ml_get(curwin->w_cursor.lnum - 1));
            if (strncmp(look, lead_start, (size_t)lead_start_len) == 0) {
              amount = get_indent_lnum(curwin->w_cursor.lnum - 1);
            } else if (strncmp(look, lead_middle, (size_t)lead_middle_len) == 0) {
              amount = get_indent_lnum(curwin->w_cursor.lnum - 1);
              break;
            } else if (strncmp(ml_get(comment_pos->lnum) + comment_pos->col,
                               lead_start, (size_t)lead_start_len) != 0) {
              // If the start comment string doesn't match with the
              // start of the comment, skip this entry. XXX
              continue;
            }
          }
          if (start_off != 0) {
            amount += start_off;
          } else if (start_align == COM_RIGHT) {
            amount += vim_strsize(lead_start) - vim_strsize(lead_middle);
          }
          break;
        }

        // If our line starts with the end comment string, line it up
        // with the middle comment
        if (strncmp(theline, lead_middle, (size_t)lead_middle_len) != 0
            && strncmp(theline, lead_end, strlen(lead_end)) == 0) {
          amount = get_indent_lnum(curwin->w_cursor.lnum - 1);
          // XXX
          if (off != 0) {
            amount += off;
          } else if (align == COM_RIGHT) {
            amount += vim_strsize(lead_start) - vim_strsize(lead_middle);
          }
          done = true;
          break;
        }
      }
    }

    // If our line starts with an asterisk, line up with the
    // asterisk in the comment opener; otherwise, line up
    // with the first character of the comment text.
    if (done) {
      // skip
    } else if (theline[0] == '*') {
      amount += 1;
    } else {
      // If we are more than one line away from the comment opener, take
      // the indent of the previous non-empty line.  If 'cino' has "CO"
      // and we are just below the comment opener and there are any
      // white characters after it line up with the text after it;
      // otherwise, add the amount specified by "c" in 'cino'
      amount = -1;
      for (lnum = cur_curpos.lnum - 1; lnum > comment_pos->lnum; lnum--) {
        if (linewhite(lnum)) {                      // skip blank lines
          continue;
        }
        amount = get_indent_lnum(lnum);             // XXX
        break;
      }
      if (amount == -1) {                           // use the comment opener
        if (!curbuf->b_ind_in_comment2) {
          start = ml_get(comment_pos->lnum);
          look = start + comment_pos->col + 2;  // skip / and *
          if (*look != NUL) {                   // if something after it
            comment_pos->col = (colnr_T)(skipwhite(look) - start);
          }
        }
        getvcol(curwin, comment_pos, &col, NULL, NULL);
        amount = col;
        if (curbuf->b_ind_in_comment2 || *look == NUL) {
          amount += curbuf->b_ind_in_comment;
        }
      }
    }
    goto theend;
  }
  // Are we looking at a ']' that has a match?
  if (*skipwhite(theline) == ']'
      && (trypos = find_match_char('[', curbuf->b_ind_maxparen)) != NULL) {
    // align with the line containing the '['.
    amount = get_indent_lnum(trypos->lnum);
    goto theend;
  }
  // Are we inside parentheses or braces?
  // XXX
  if (((trypos = find_match_paren(curbuf->b_ind_maxparen)) != NULL
       && curbuf->b_ind_java == 0)
      || (tryposBrace = find_start_brace()) != NULL
      || trypos != NULL) {
    if (trypos != NULL && tryposBrace != NULL) {
      // Both an unmatched '(' and '{' is found.  Use the one which is
      // closer to the current cursor position, set the other to NULL.
      if (trypos->lnum != tryposBrace->lnum
          ? trypos->lnum < tryposBrace->lnum
          : trypos->col < tryposBrace->col) {
        trypos = NULL;
      } else {
        tryposBrace = NULL;
      }
    }

    if (trypos != NULL) {
      our_paren_pos = *trypos;
      // If the matching paren is more than one line away, use the indent of
      // a previous non-empty line that matches the same paren.
      if (theline[0] == ')' && curbuf->b_ind_paren_prev) {
        // Line up with the start of the matching paren line.
        amount = get_indent_lnum(curwin->w_cursor.lnum - 1);      // XXX
      } else {
        amount = -1;
        for (lnum = cur_curpos.lnum - 1; lnum > our_paren_pos.lnum; lnum--) {
          l = skipwhite(ml_get(lnum));
          if (cin_nocode(l)) {                   // skip comment lines
            continue;
          }
          if (cin_ispreproc_cont(&l, &lnum, &amount)) {
            continue;                           // ignore #define, #if, etc.
          }
          curwin->w_cursor.lnum = lnum;

          // Skip a comment or raw string. XXX
          if ((trypos = ind_find_start_CORS(NULL)) != NULL) {
            lnum = trypos->lnum + 1;
            continue;
          }

          // XXX
          if ((trypos = find_match_paren(corr_ind_maxparen(&cur_curpos))) != NULL
              && trypos->lnum == our_paren_pos.lnum
              && trypos->col == our_paren_pos.col) {
            amount = get_indent_lnum(lnum);             // XXX

            if (theline[0] == ')') {
              if (our_paren_pos.lnum != lnum
                  && cur_amount > amount) {
                cur_amount = amount;
              }
              amount = -1;
            }
            break;
          }
        }
      }

      // Line up with line where the matching paren is. XXX
      // If the line starts with a '(' or the indent for unclosed
      // parentheses is zero, line up with the unclosed parentheses.
      if (amount == -1) {
        int ignore_paren_col = 0;
        int is_if_for_while = 0;

        if (curbuf->b_ind_if_for_while) {
          // Look for the outermost opening parenthesis on this line
          // and check whether it belongs to an "if", "for" or "while".

          pos_T cursor_save = curwin->w_cursor;
          pos_T outermost;
          char *line;

          trypos = &our_paren_pos;
          do {
            outermost = *trypos;
            curwin->w_cursor.lnum = outermost.lnum;
            curwin->w_cursor.col = outermost.col;

            trypos = find_match_paren(curbuf->b_ind_maxparen);
          } while (trypos && trypos->lnum == outermost.lnum);

          curwin->w_cursor = cursor_save;

          line = ml_get(outermost.lnum);

          is_if_for_while =
            cin_is_if_for_while_before_offset(line, &outermost.col);
        }

        amount = skip_label(our_paren_pos.lnum, &look);
        look = skipwhite(look);
        if (*look == '(') {
          linenr_T save_lnum = curwin->w_cursor.lnum;
          char *line;
          int look_col;

          // Ignore a '(' in front of the line that has a match before
          // our matching '('.
          curwin->w_cursor.lnum = our_paren_pos.lnum;
          line = get_cursor_line_ptr();
          look_col = (int)(look - line);
          curwin->w_cursor.col = look_col + 1;
          if ((trypos = findmatchlimit(NULL, ')', 0,
                                       curbuf->b_ind_maxparen))
              != NULL
              && trypos->lnum == our_paren_pos.lnum
              && trypos->col < our_paren_pos.col) {
            ignore_paren_col = trypos->col + 1;
          }

          curwin->w_cursor.lnum = save_lnum;
          look = ml_get(our_paren_pos.lnum) + look_col;
        }
        if (theline[0] == ')' || (curbuf->b_ind_unclosed == 0
                                  && is_if_for_while == 0)
            || (!curbuf->b_ind_unclosed_noignore && *look == '('
                && ignore_paren_col == 0)) {
          // If we're looking at a close paren, line up right there;
          // otherwise, line up with the next (non-white) character.
          // When b_ind_unclosed_wrapped is set and the matching paren is
          // the last nonwhite character of the line, use either the
          // indent of the current line or the indentation of the next
          // outer paren and add b_ind_unclosed_wrapped (for very long
          // lines).
          if (theline[0] != ')') {
            cur_amount = MAXCOL;
            l = ml_get(our_paren_pos.lnum);
            if (curbuf->b_ind_unclosed_wrapped && cin_ends_in(l, "(")) {
              // look for opening unmatched paren, indent one level
              // for each additional level
              n = 1;
              for (col = 0; col < our_paren_pos.col; col++) {
                switch (l[col]) {
                case '(':
                case '{':
                  n++;
                  break;

                case ')':
                case '}':
                  if (n > 1) {
                    n--;
                  }
                  break;
                }
              }

              our_paren_pos.col = 0;
              amount += n * curbuf->b_ind_unclosed_wrapped;
            } else if (curbuf->b_ind_unclosed_whiteok) {
              our_paren_pos.col++;
            } else {
              col = our_paren_pos.col + 1;
              while (ascii_iswhite(l[col])) {
                col++;
              }
              if (l[col] != NUL) {              // In case of trailing space
                our_paren_pos.col = col;
              } else {
                our_paren_pos.col++;
              }
            }
          }

          // Find how indented the paren is, or the character after it
          // if we did the above "if".
          if (our_paren_pos.col > 0) {
            getvcol(curwin, &our_paren_pos, &col, NULL, NULL);
            if (cur_amount > (int)col) {
              cur_amount = col;
            }
          }
        }

        if (theline[0] == ')' && curbuf->b_ind_matching_paren) {
          // Line up with the start of the matching paren line.
        } else if ((curbuf->b_ind_unclosed == 0 && is_if_for_while == 0)
                   || (!curbuf->b_ind_unclosed_noignore
                       && *look == '(' && ignore_paren_col == 0)) {
          if (cur_amount != MAXCOL) {
            amount = cur_amount;
          }
        } else {
          // Add b_ind_unclosed2 for each '(' before our matching one,
          // but ignore (void) before the line (ignore_paren_col).
          col = our_paren_pos.col;
          while ((int)our_paren_pos.col > ignore_paren_col) {
            our_paren_pos.col--;
            switch (*ml_get_pos(&our_paren_pos)) {
            case '(':
              amount += curbuf->b_ind_unclosed2;
              col = our_paren_pos.col;
              break;
            case ')':
              amount -= curbuf->b_ind_unclosed2;
              col = MAXCOL;
              break;
            }
          }

          // Use b_ind_unclosed once, when the first '(' is not inside
          // braces
          if (col == MAXCOL) {
            amount += curbuf->b_ind_unclosed;
          } else {
            curwin->w_cursor.lnum = our_paren_pos.lnum;
            curwin->w_cursor.col = col;
            if (find_match_paren_after_brace(curbuf->b_ind_maxparen)) {
              amount += curbuf->b_ind_unclosed2;
            } else {
              if (is_if_for_while) {
                amount += curbuf->b_ind_if_for_while;
              } else {
                amount += curbuf->b_ind_unclosed;
              }
            }
          }
          // For a line starting with ')' use the minimum of the two
          // positions, to avoid giving it more indent than the previous
          // lines:
          //  func_long_name(               if (x
          //    arg                                 && yy
          //    )         ^ not here           )    ^ not here
          if (cur_amount < amount) {
            amount = cur_amount;
          }
        }
      }

      // add extra indent for a comment
      if (cin_iscomment(theline)) {
        amount += curbuf->b_ind_comment;
      }
    } else {
      // We are inside braces, there is a { before this line at the position
      // stored in tryposBrace.
      // Make a copy of tryposBrace, it may point to pos_copy inside
      // find_start_brace(), which may be changed somewhere.
      tryposCopy = *tryposBrace;
      tryposBrace = &tryposCopy;
      trypos = tryposBrace;
      ourscope = trypos->lnum;
      start = ml_get(ourscope);

      // Now figure out how indented the line is in general.
      // If the brace was at the start of the line, we use that;
      // otherwise, check out the indentation of the line as
      // a whole and then add the "imaginary indent" to that.
      look = skipwhite(start);
      if (*look == '{') {
        getvcol(curwin, trypos, &col, NULL, NULL);
        amount = col;
        if (*start == '{') {
          start_brace = BRACE_IN_COL0;
        } else {
          start_brace = BRACE_AT_START;
        }
      } else {
        // That opening brace might have been on a continuation
        // line.  If so, find the start of the line.
        curwin->w_cursor.lnum = ourscope;

        // Position the cursor over the rightmost paren, so that
        // matching it will take us back to the start of the line.
        lnum = ourscope;
        if (find_last_paren(start, '(', ')')
            && (trypos = find_match_paren(curbuf->b_ind_maxparen)) != NULL) {
          lnum = trypos->lnum;
        }

        // It could have been something like
        //         case 1: if (asdf &&
        //                      ldfd) {
        //                  }
        if ((curbuf->b_ind_js || curbuf->b_ind_keep_case_label)
            && cin_iscase(skipwhite(get_cursor_line_ptr()), false)) {
          amount = get_indent();
        } else if (curbuf->b_ind_js) {
          amount = get_indent_lnum(lnum);
        } else {
          amount = skip_label(lnum, &l);
        }

        start_brace = BRACE_AT_END;
      }

      // For Javascript check if the line starts with "key:".
      bool js_cur_has_key = curbuf->b_ind_js ? cin_has_js_key(theline) : false;

      // If we're looking at a closing brace, that's where
      // we want to be.  Otherwise, add the amount of room
      // that an indent is supposed to be.
      if (theline[0] == '}') {
        // they may want closing braces to line up with something
        // other than the open brace.  indulge them, if so.
        amount += curbuf->b_ind_close_extra;
      } else {
        // If we're looking at an "else", try to find an "if"
        // to match it with.
        // If we're looking at a "while", try to find a "do"
        // to match it with.
        lookfor = LOOKFOR_INITIAL;
        if (cin_iselse(theline)) {
          lookfor = LOOKFOR_IF;
        } else if (cin_iswhileofdo(theline, cur_curpos.lnum)) {   // XXX
          lookfor = LOOKFOR_DO;
        }
        if (lookfor != LOOKFOR_INITIAL) {
          curwin->w_cursor.lnum = cur_curpos.lnum;
          if (find_match(lookfor, ourscope) == OK) {
            amount = get_indent();              // XXX
            goto theend;
          }
        }

        // We get here if we are not on an "while-of-do" or "else" (or
        // failed to find a matching "if").
        // Search backwards for something to line up with.
        // First set amount for when we don't find anything.

        // if the '{' is  _really_ at the left margin, use the imaginary
        // location of a left-margin brace.  Otherwise, correct the
        // location for b_ind_open_extra.

        if (start_brace == BRACE_IN_COL0) {     // '{' is in column 0
          amount = curbuf->b_ind_open_left_imag;
          lookfor_cpp_namespace = true;
        } else if (start_brace == BRACE_AT_START
                   && lookfor_cpp_namespace) {  // '{' is at start
          lookfor_cpp_namespace = true;
        } else {
          if (start_brace == BRACE_AT_END) {    // '{' is at end of line
            amount += curbuf->b_ind_open_imag;

            l = skipwhite(get_cursor_line_ptr());
            if (cin_is_cpp_namespace(l)) {
              amount += curbuf->b_ind_cpp_namespace;
            } else if (cin_is_cpp_extern_c(l)) {
              amount += curbuf->b_ind_cpp_extern_c;
            }
          } else {
            // Compensate for adding b_ind_open_extra later.
            amount -= curbuf->b_ind_open_extra;
            if (amount < 0) {
              amount = 0;
            }
          }
        }

        lookfor_break = false;

        if (cin_iscase(theline, false)) {       // it's a switch() label
          lookfor = LOOKFOR_CASE;       // find a previous switch() label
          amount += curbuf->b_ind_case;
        } else if (cin_isscopedecl(theline)) {  // private:, ...
          lookfor = LOOKFOR_SCOPEDECL;          // class decl is this block
          amount += curbuf->b_ind_scopedecl;
        } else {
          if (curbuf->b_ind_case_break && cin_isbreak(theline)) {
            // break; ...
            lookfor_break = true;
          }

          lookfor = LOOKFOR_INITIAL;
          // b_ind_level from start of block
          amount += curbuf->b_ind_level;
        }
        scope_amount = amount;
        whilelevel = 0;

        // Search backwards.  If we find something we recognize, line up
        // with that.
        //
        // If we're looking at an open brace, indent
        // the usual amount relative to the conditional
        // that opens the block.
        curwin->w_cursor = cur_curpos;
        while (true) {
          curwin->w_cursor.lnum--;
          curwin->w_cursor.col = 0;

          // If we went all the way back to the start of our scope, line
          // up with it.
          if (curwin->w_cursor.lnum <= ourscope) {
            // We reached end of scope:
            // If looking for a enum or structure initialization
            // go further back:
            // If it is an initializer (enum xxx or xxx =), then
            // don't add ind_continuation, otherwise it is a variable
            // declaration:
            // int x,
            //     here; <-- add ind_continuation
            if (lookfor == LOOKFOR_ENUM_OR_INIT) {
              if (curwin->w_cursor.lnum == 0
                  || curwin->w_cursor.lnum
                  < ourscope - curbuf->b_ind_maxparen) {
                // nothing found (abuse curbuf->b_ind_maxparen as
                // limit) assume terminated line (i.e. a variable
                // initialization)
                if (cont_amount > 0) {
                  amount = cont_amount;
                } else if (!curbuf->b_ind_js) {
                  amount += ind_continuation;
                }
                break;
              }

              // If we're in a comment or raw string now, skip to
              // the start of it.
              trypos = ind_find_start_CORS(NULL);
              if (trypos != NULL) {
                curwin->w_cursor.lnum = trypos->lnum + 1;
                curwin->w_cursor.col = 0;
                continue;
              }

              l = get_cursor_line_ptr();

              // Skip preprocessor directives and blank lines.
              if (cin_ispreproc_cont(&l, &curwin->w_cursor.lnum, &amount)) {
                continue;
              }

              if (cin_nocode(l)) {
                continue;
              }

              terminated = cin_isterminated(l, false, true);

              // If we are at top level and the line looks like a
              // function declaration, we are done
              // (it's a variable declaration).
              if (start_brace != BRACE_IN_COL0
                  || !cin_isfuncdecl(&l, curwin->w_cursor.lnum, 0)) {
                // if the line is terminated with another ','
                // it is a continued variable initialization.
                // don't add extra indent.
                // TODO(vim): does not work, if  a function
                // declaration is split over multiple lines:
                // cin_isfuncdecl returns false then.
                if (terminated == ',') {
                  break;
                }

                // if it is an enum declaration or an assignment,
                // we are done.
                if (terminated != ';' && cin_isinit()) {
                  break;
                }

                // nothing useful found
                if (terminated == 0 || terminated == '{') {
                  continue;
                }
              }

              if (terminated != ';') {
                // Skip parens and braces. Position the cursor
                // over the rightmost paren, so that matching it
                // will take us back to the start of the line.
                // XXX
                trypos = NULL;
                if (find_last_paren(l, '(', ')')) {
                  trypos = find_match_paren(curbuf->b_ind_maxparen);
                }

                if (trypos == NULL && find_last_paren(l, '{', '}')) {
                  trypos = find_start_brace();
                }

                if (trypos != NULL) {
                  curwin->w_cursor.lnum = trypos->lnum + 1;
                  curwin->w_cursor.col = 0;
                  continue;
                }
              }

              // it's a variable declaration, add indentation
              // like in
              // int a,
              //    b;
              if (cont_amount > 0) {
                amount = cont_amount;
              } else {
                amount += ind_continuation;
              }
            } else if (lookfor == LOOKFOR_UNTERM) {
              if (cont_amount > 0) {
                amount = cont_amount;
              } else {
                amount += ind_continuation;
              }
            } else {
              if (lookfor != LOOKFOR_TERM
                  && lookfor != LOOKFOR_CPP_BASECLASS
                  && lookfor != LOOKFOR_COMMA) {
                amount = scope_amount;
                if (theline[0] == '{') {
                  amount += curbuf->b_ind_open_extra;
                  added_to_amount = curbuf->b_ind_open_extra;
                }
              }

              if (lookfor_cpp_namespace) {
                // Looking for C++ namespace, need to look further
                // back.
                if (curwin->w_cursor.lnum == ourscope) {
                  continue;
                }

                if (curwin->w_cursor.lnum == 0
                    || curwin->w_cursor.lnum
                    < ourscope - FIND_NAMESPACE_LIM) {
                  break;
                }

                // If we're in a comment or raw string now, skip
                // to the start of it.
                trypos = ind_find_start_CORS(NULL);
                if (trypos != NULL) {
                  curwin->w_cursor.lnum = trypos->lnum + 1;
                  curwin->w_cursor.col = 0;
                  continue;
                }

                l = get_cursor_line_ptr();

                // Skip preprocessor directives and blank lines.
                if (cin_ispreproc_cont(&l, &curwin->w_cursor.lnum, &amount)) {
                  continue;
                }

                // Finally the actual check for "namespace".
                if (cin_is_cpp_namespace(l)) {
                  amount += curbuf->b_ind_cpp_namespace
                            - added_to_amount;
                  break;
                } else if (cin_is_cpp_extern_c(l)) {
                  amount += curbuf->b_ind_cpp_extern_c - added_to_amount;
                  break;
                }

                if (cin_nocode(l)) {
                  continue;
                }
              }
            }
            break;
          }

          // If we're in a comment or raw string now, skip to the start
          // of it.
          // XXX
          if ((trypos = ind_find_start_CORS(&raw_string_start)) != NULL) {
            curwin->w_cursor.lnum = trypos->lnum + 1;
            curwin->w_cursor.col = 0;
            continue;
          }

          l = get_cursor_line_ptr();

          // If this is a switch() label, may line up relative to that.
          // If this is a C++ scope declaration, do the same.
          bool iscase = cin_iscase(l, false);
          if (iscase || cin_isscopedecl(l)) {
            // we are only looking for cpp base class
            // declaration/initialization any longer
            if (lookfor == LOOKFOR_CPP_BASECLASS) {
              break;
            }

            // When looking for a "do" we are not interested in
            // labels.
            if (whilelevel > 0) {
              continue;
            }

            //  case xx:
            //      c = 99 +        <- this indent plus continuation
            // ->          here;
            if (lookfor == LOOKFOR_UNTERM || lookfor == LOOKFOR_ENUM_OR_INIT) {
              if (cont_amount > 0) {
                amount = cont_amount;
              } else {
                amount += ind_continuation;
              }
              break;
            }

            // case xx: <- line up with this case
            //     x = 333;
            // case yy:
            if ((iscase && lookfor == LOOKFOR_CASE)
                || (iscase && lookfor_break)
                || (!iscase && lookfor == LOOKFOR_SCOPEDECL)) {
              // Check that this case label is not for another
              // switch()
              // XXX
              if ((trypos = find_start_brace()) == NULL
                  || trypos->lnum == ourscope) {
                amount = get_indent();                  // XXX
                break;
              }
              continue;
            }

            n = get_indent_nolabel(curwin->w_cursor.lnum);          // XXX

            //   case xx: if (cond)         <- line up with this if
            //                y = y + 1;
            // ->         s = 99;
            //
            //   case xx:
            //       if (cond)          <- line up with this line
            //           y = y + 1;
            // ->    s = 99;
            if (lookfor == LOOKFOR_TERM) {
              if (n) {
                amount = n;
              }

              if (!lookfor_break) {
                break;
              }
            }

            //   case xx: x = x + 1;        <- line up with this x
            // ->         y = y + 1;
            //
            //   case xx: if (cond)         <- line up with this if
            // ->              y = y + 1;
            if (n) {
              amount = n;
              l = after_label(get_cursor_line_ptr());
              if (l != NULL && cin_is_cinword(l)) {
                if (theline[0] == '{') {
                  amount += curbuf->b_ind_open_extra;
                } else {
                  amount += curbuf->b_ind_level
                            + curbuf->b_ind_no_brace;
                }
              }
              break;
            }

            // Try to get the indent of a statement before the switch
            // label.  If nothing is found, line up relative to the
            // switch label.
            //      break;              <- may line up with this line
            //   case xx:
            // ->   y = 1;
            scope_amount = get_indent() + (iscase            // XXX
                                           ? curbuf->b_ind_case_code
                                           : curbuf->b_ind_scopedecl_code);
            lookfor = curbuf->b_ind_case_break
                      ? LOOKFOR_NOBREAK : LOOKFOR_ANY;
            continue;
          }

          // Looking for a switch() label or C++ scope declaration,
          // ignore other lines, skip {}-blocks.
          if (lookfor == LOOKFOR_CASE || lookfor == LOOKFOR_SCOPEDECL) {
            if (find_last_paren(l, '{', '}')
                && (trypos = find_start_brace()) != NULL) {
              curwin->w_cursor.lnum = trypos->lnum + 1;
              curwin->w_cursor.col = 0;
            }
            continue;
          }

          // Ignore jump labels with nothing after them.
          if (!curbuf->b_ind_js && cin_islabel()) {
            l = after_label(get_cursor_line_ptr());
            if (l == NULL || cin_nocode(l)) {
              continue;
            }
          }

          // Ignore #defines, #if, etc.
          // Ignore comment and empty lines.
          // (need to get the line again, cin_islabel() may have
          // unlocked it)
          l = get_cursor_line_ptr();
          if (cin_ispreproc_cont(&l, &curwin->w_cursor.lnum, &amount)
              || cin_nocode(l)) {
            continue;
          }

          // Are we at the start of a cpp base class declaration or
          // constructor initialization?
          // XXX
          n = 0;
          if (lookfor != LOOKFOR_TERM && curbuf->b_ind_cpp_baseclass > 0) {
            n = cin_is_cpp_baseclass(&cache_cpp_baseclass);
            l = get_cursor_line_ptr();
          }
          if (n) {
            if (lookfor == LOOKFOR_UNTERM) {
              if (cont_amount > 0) {
                amount = cont_amount;
              } else {
                amount += ind_continuation;
              }
            } else if (theline[0] == '{') {
              // Need to find start of the declaration.
              lookfor = LOOKFOR_UNTERM;
              ind_continuation = 0;
              continue;
            } else {
              // XXX
              amount = get_baseclass_amount(cache_cpp_baseclass.lpos.col);
            }
            break;
          } else if (lookfor == LOOKFOR_CPP_BASECLASS) {
            // only look, whether there is a cpp base class
            // declaration or initialization before the opening brace.
            if (cin_isterminated(l, true, false)) {
              break;
            } else {
              continue;
            }
          }

          // What happens next depends on the line being terminated.
          // If terminated with a ',' only consider it terminating if
          // there is another unterminated statement behind, eg:
          //   123,
          //   sizeof
          //      here
          // Otherwise check whether it is an enumeration or structure
          // initialisation (not indented) or a variable declaration
          // (indented).
          terminated = cin_isterminated(l, false, true);

          if (js_cur_has_key) {
            js_cur_has_key = false;  // only check the first line
            if (curbuf->b_ind_js && terminated == ',') {
              // For Javascript we might be inside an object:
              //   key: something,  <- align with this
              //   key: something
              // or:
              //   key: something +  <- align with this
              //       something,
              //   key: something
              lookfor = LOOKFOR_JS_KEY;
            }
          }
          if (lookfor == LOOKFOR_JS_KEY && cin_has_js_key(l)) {
            amount = get_indent();
            break;
          }
          if (lookfor == LOOKFOR_COMMA) {
            if (tryposBrace != NULL && tryposBrace->lnum
                >= curwin->w_cursor.lnum) {
              break;
            }
            if (terminated == ',') {
              // Line below current line is the one that starts a
              // (possibly broken) line ending in a comma.
              break;
            }
            amount = get_indent();
            if (curwin->w_cursor.lnum - 1 == ourscope) {
              // line above is start of the scope, thus current
              // line is the one that stars a (possibly broken)
              // line ending in a comma.
              break;
            }
          }

          if (terminated == 0 || (lookfor != LOOKFOR_UNTERM
                                  && terminated == ',')) {
            if (lookfor != LOOKFOR_ENUM_OR_INIT
                && (*skipwhite(l) == '[' || l[strlen(l) - 1] == '[')) {
              amount += ind_continuation;
            }
            // If we're in the middle of a paren thing, Go back to the line
            // that starts it so we can get the right prevailing indent
            //     if ( foo &&
            //              bar )

            // Position the cursor over the rightmost paren, so that
            // matching it will take us back to the start of the line.
            // Ignore a match before the start of the block.
            (void)find_last_paren(l, '(', ')');
            trypos = find_match_paren(corr_ind_maxparen(&cur_curpos));
            if (trypos != NULL && (trypos->lnum < tryposBrace->lnum
                                   || (trypos->lnum == tryposBrace->lnum
                                       && trypos->col < tryposBrace->col))) {
              trypos = NULL;
            }

            l = get_cursor_line_ptr();

            // If we are looking for ',', we also look for matching
            // braces.
            if (trypos == NULL && terminated == ',') {
              if (find_last_paren(l, '{', '}')) {
                trypos = find_start_brace();
              }
              l = get_cursor_line_ptr();
            }

            if (trypos != NULL) {
              // Check if we are on a case label now.  This is
              // handled above.
              //     case xx:  if ( asdf &&
              //                        asdf)
              curwin->w_cursor = *trypos;
              l = get_cursor_line_ptr();
              if (cin_iscase(l, false) || cin_isscopedecl(l)) {
                curwin->w_cursor.lnum++;
                curwin->w_cursor.col = 0;
                continue;
              }
            }

            // Skip over continuation lines to find the one to get the
            // indent from
            // char *usethis = "bla{backslash}
            //           bla",
            //      here;
            if (terminated == ',') {
              while (curwin->w_cursor.lnum > 1) {
                l = ml_get(curwin->w_cursor.lnum - 1);
                if (*l == NUL || l[strlen(l) - 1] != '\\') {
                  break;
                }
                curwin->w_cursor.lnum--;
                curwin->w_cursor.col = 0;
              }
              l = get_cursor_line_ptr();
            }

            // Get indent and pointer to text for current line,
            // ignoring any jump label.     XXX
            if (curbuf->b_ind_js) {
              cur_amount = get_indent();
            } else {
              cur_amount = skip_label(curwin->w_cursor.lnum, &l);
            }
            // If this is just above the line we are indenting, and it
            // starts with a '{', line it up with this line.
            //          while (not)
            // ->       {
            //          }
            if (terminated != ',' && lookfor != LOOKFOR_TERM
                && theline[0] == '{') {
              amount = cur_amount;
              // Only add b_ind_open_extra when the current line
              // doesn't start with a '{', which must have a match
              // in the same line (scope is the same).  Probably:
              //        { 1, 2 },
              // ->     { 3, 4 }
              if (*skipwhite(l) != '{') {
                amount += curbuf->b_ind_open_extra;
              }

              if (curbuf->b_ind_cpp_baseclass && !curbuf->b_ind_js) {
                // have to look back, whether it is a cpp base
                // class declaration or initialization
                lookfor = LOOKFOR_CPP_BASECLASS;
                continue;
              }
              break;
            }

            // Check if we are after an "if", "while", etc.
            // Also allow "   } else".
            if (cin_is_cinword(l) || cin_iselse(skipwhite(l))) {
              // Found an unterminated line after an if (), line up
              // with the last one.
              //   if (cond)
              //             100 +
              // ->              here;
              if (lookfor == LOOKFOR_UNTERM
                  || lookfor == LOOKFOR_ENUM_OR_INIT) {
                if (cont_amount > 0) {
                  amount = cont_amount;
                } else {
                  amount += ind_continuation;
                }
                break;
              }

              // If this is just above the line we are indenting, we
              // are finished.
              //            while (not)
              // ->             here;
              // Otherwise this indent can be used when the line
              // before this is terminated.
              //        yyy;
              //        if (stat)
              //            while (not)
              //                xxx;
              // ->     here;
              amount = cur_amount;
              if (theline[0] == '{') {
                amount += curbuf->b_ind_open_extra;
              }
              if (lookfor != LOOKFOR_TERM) {
                amount += curbuf->b_ind_level
                          + curbuf->b_ind_no_brace;
                break;
              }

              // Special trick: when expecting the while () after a
              // do, line up with the while()
              //     do
              //            x = 1;
              // ->  here
              l = skipwhite(get_cursor_line_ptr());
              if (cin_isdo(l)) {
                if (whilelevel == 0) {
                  break;
                }
                whilelevel--;
              }

              // When searching for a terminated line, don't use the
              // one between the "if" and the matching "else".
              // Need to use the scope of this "else".  XXX
              // If whilelevel != 0 continue looking for a "do {".
              if (cin_iselse(l) && whilelevel == 0) {
                // If we're looking at "} else", let's make sure we
                // find the opening brace of the enclosing scope,
                // not the one from "if () {".
                if (*l == '}') {
                  curwin->w_cursor.col =
                    (colnr_T)(l - get_cursor_line_ptr()) + 1;
                }

                if ((trypos = find_start_brace()) == NULL
                    || find_match(LOOKFOR_IF, trypos->lnum)
                    == FAIL) {
                  break;
                }
              }
            } else {
              // If we're below an unterminated line that is not an
              // "if" or something, we may line up with this line or
              // add something for a continuation line, depending on
              // the line before this one.

              // Found two unterminated lines on a row, line up with
              // the last one.
              //   c = 99 +
              //            100 +
              // ->         here;
              if (lookfor == LOOKFOR_UNTERM) {
                // When line ends in a comma add extra indent
                if (terminated == ',') {
                  amount += ind_continuation;
                }
                break;
              }

              if (lookfor == LOOKFOR_ENUM_OR_INIT) {
                // Found two lines ending in ',', lineup with the
                // lowest one, but check for cpp base class
                // declaration/initialization, if it is an
                // opening brace or we are looking just for
                // enumerations/initializations.
                if (terminated == ',') {
                  if (curbuf->b_ind_cpp_baseclass == 0) {
                    break;
                  }

                  lookfor = LOOKFOR_CPP_BASECLASS;
                  continue;
                }

                // Ignore unterminated lines in between, but
                // reduce indent.
                if (amount > cur_amount) {
                  amount = cur_amount;
                }
              } else {
                // Found first unterminated line on a row, may
                // line up with this line, remember its indent
                //          100 +
                // ->       here;
                l = get_cursor_line_ptr();
                amount = cur_amount;

                n = (int)strlen(l);
                if (curbuf->b_ind_js && terminated == ','
                    && (*skipwhite(l) == ']' || (n >= 2 && l[n - 2] == ']'))) {
                  break;
                }

                // If previous line ends in ',', check whether we
                // are in an initialization or enum
                // struct xxx =
                // {
                //      sizeof a,
                //      124 };
                // or a normal possible continuation line.
                // but only, of no other statement has been found
                // yet.
                if (lookfor == LOOKFOR_INITIAL && terminated == ',') {
                  if (curbuf->b_ind_js) {
                    // Search for a line ending in a comma
                    // and line up with the line below it
                    // (could be the current line).
                    // some = [
                    //     1,     <- line up here
                    //     2,
                    // some = [
                    //     3 +    <- line up here
                    //       4 *
                    //        5,
                    //     6,
                    if (cin_iscomment(skipwhite(l))) {
                      break;
                    }
                    lookfor = LOOKFOR_COMMA;
                    trypos = find_match_char('[', curbuf->b_ind_maxparen);
                    if (trypos != NULL) {
                      if (trypos->lnum == curwin->w_cursor.lnum - 1) {
                        // Current line is first inside
                        // [], line up with it.
                        break;
                      }
                      ourscope = trypos->lnum;
                    }
                  } else {
                    lookfor = LOOKFOR_ENUM_OR_INIT;
                    cont_amount = cin_first_id_amount();
                  }
                } else {
                  if (lookfor == LOOKFOR_INITIAL
                      && *l != NUL
                      && l[strlen(l) - 1] == '\\') {
                    // XXX
                    cont_amount = cin_get_equal_amount(curwin->w_cursor.lnum);
                  }
                  if (lookfor != LOOKFOR_TERM
                      && lookfor != LOOKFOR_JS_KEY
                      && lookfor != LOOKFOR_COMMA
                      && raw_string_start != curwin->w_cursor.lnum) {
                    lookfor = LOOKFOR_UNTERM;
                  }
                }
              }
            }
            // Check if we are after a while (cond);
            // If so: Ignore until the matching "do".
          } else if (cin_iswhileofdo_end((uint8_t)terminated)) {  // XXX
            // Found an unterminated line after a while ();, line up
            // with the last one.
            //      while (cond);
            //      100 +               <- line up with this one
            // ->           here;
            if (lookfor == LOOKFOR_UNTERM
                || lookfor == LOOKFOR_ENUM_OR_INIT) {
              if (cont_amount > 0) {
                amount = cont_amount;
              } else {
                amount += ind_continuation;
              }
              break;
            }

            if (whilelevel == 0) {
              lookfor = LOOKFOR_TERM;
              amount = get_indent();                // XXX
              if (theline[0] == '{') {
                amount += curbuf->b_ind_open_extra;
              }
            }
            whilelevel++;
          } else {
            // We are after a "normal" statement.
            // If we had another statement we can stop now and use the
            // indent of that other statement.
            // Otherwise the indent of the current statement may be used,
            // search backwards for the next "normal" statement.

            // Skip single break line, if before a switch label. It
            // may be lined up with the case label.
            if (lookfor == LOOKFOR_NOBREAK
                && cin_isbreak(skipwhite(get_cursor_line_ptr()))) {
              lookfor = LOOKFOR_ANY;
              continue;
            }

            // Handle "do {" line.
            if (whilelevel > 0) {
              l = cin_skipcomment(get_cursor_line_ptr());
              if (cin_isdo(l)) {
                amount = get_indent();                  // XXX
                whilelevel--;
                continue;
              }
            }

            // Found a terminated line above an unterminated line. Add
            // the amount for a continuation line.
            //   x = 1;
            //   y = foo +
            // ->       here;
            // or
            //   int x = 1;
            //   int foo,
            // ->       here;
            if (lookfor == LOOKFOR_UNTERM
                || lookfor == LOOKFOR_ENUM_OR_INIT) {
              if (cont_amount > 0) {
                amount = cont_amount;
              } else {
                amount += ind_continuation;
              }
              break;
            }

            // Found a terminated line above a terminated line or "if"
            // etc. line. Use the amount of the line below us.
            //   x = 1;                         x = 1;
            //   if (asdf)                  y = 2;
            //       while (asdf)         ->here;
            //          here;
            // ->foo;
            if (lookfor == LOOKFOR_TERM) {
              if (!lookfor_break && whilelevel == 0) {
                break;
              }
            } else {
              // First line above the one we're indenting is terminated.
              // To know what needs to be done look further backward for
              // a terminated line.

              // position the cursor over the rightmost paren, so
              // that matching it will take us back to the start of
              // the line.  Helps for:
              //     func(asdr,
              //              asdfasdf);
              //     here;
term_again:
              l = get_cursor_line_ptr();
              if (find_last_paren(l, '(', ')')
                  && (trypos = find_match_paren(curbuf->b_ind_maxparen)) != NULL) {
                // Check if we are on a case label now.  This is
                // handled above.
                //         case xx:  if ( asdf &&
                //                          asdf)
                curwin->w_cursor = *trypos;
                l = get_cursor_line_ptr();
                if (cin_iscase(l, false) || cin_isscopedecl(l)) {
                  curwin->w_cursor.lnum++;
                  curwin->w_cursor.col = 0;
                  continue;
                }
              }

              // When aligning with the case statement, don't align
              // with a statement after it.
              //  case 1: {   <-- don't use this { position
              //        stat;
              //  }
              //  case 2:
              //        stat;
              // }
              iscase = curbuf->b_ind_keep_case_label && cin_iscase(l, false);

              // Get indent and pointer to text for current line,
              // ignoring any jump label.
              amount = skip_label(curwin->w_cursor.lnum, &l);

              if (theline[0] == '{') {
                amount += curbuf->b_ind_open_extra;
              }
              // See remark above: "Only add b_ind_open_extra.."
              l = skipwhite(l);
              if (*l == '{') {
                amount -= curbuf->b_ind_open_extra;
              }
              lookfor = iscase ? LOOKFOR_ANY : LOOKFOR_TERM;

              // When a terminated line starts with "else" skip to
              // the matching "if":
              //       else 3;
              //             indent this;
              // Need to use the scope of this "else".  XXX
              // If whilelevel != 0 continue looking for a "do {".
              if (lookfor == LOOKFOR_TERM
                  && *l != '}'
                  && cin_iselse(l)
                  && whilelevel == 0) {
                if ((trypos = find_start_brace()) == NULL
                    || find_match(LOOKFOR_IF, trypos->lnum)
                    == FAIL) {
                  break;
                }
                continue;
              }

              // If we're at the end of a block, skip to the start of
              // that block.
              l = get_cursor_line_ptr();
              if (find_last_paren(l, '{', '}')           // XXX
                  && (trypos = find_start_brace()) != NULL) {
                curwin->w_cursor = *trypos;
                // if not "else {" check for terminated again
                // but skip block for "} else {"
                l = cin_skipcomment(get_cursor_line_ptr());
                if (*l == '}' || !cin_iselse(l)) {
                  goto term_again;
                }
                curwin->w_cursor.lnum++;
                curwin->w_cursor.col = 0;
              }
            }
          }
        }
      }
    }

    // add extra indent for a comment
    if (cin_iscomment(theline)) {
      amount += curbuf->b_ind_comment;
    }
    // subtract extra left-shift for jump labels
    if (curbuf->b_ind_jump_label > 0 && original_line_islabel) {
      amount -= curbuf->b_ind_jump_label;
    }

    goto theend;
  }

  // Ok -- we're not inside any sort of structure at all!
  //
  // this means we're at the top level, and everything should
  // basically just match where the previous line is, except
  // for the lines immediately following a function declaration,
  // which are K&R-style parameters and need to be indented.

  // if our line starts with an open brace, forget about any
  // prevailing indent and make sure it looks like the start
  // of a function

  if (theline[0] == '{') {
    amount = curbuf->b_ind_first_open;
    goto theend;
  }
  // If the NEXT line is a function declaration, the current
  // line needs to be indented as a function type spec.
  // Don't do this if the current line looks like a comment or if the
  // current line is terminated, ie. ends in ';', or if the current line
  // contains { or }: "void f() {\n if (1)"
  if (cur_curpos.lnum < curbuf->b_ml.ml_line_count
      && !cin_nocode(theline)
      && vim_strchr(theline, '{') == NULL
      && vim_strchr(theline, '}') == NULL
      && !cin_ends_in(theline, ":")
      && !cin_ends_in(theline, ",")
      && cin_isfuncdecl(NULL, cur_curpos.lnum + 1, cur_curpos.lnum + 1)
      && !cin_isterminated(theline, false, true)) {
    amount = curbuf->b_ind_func_type;
    goto theend;
  }

  // search backwards until we find something we recognize
  amount = 0;
  curwin->w_cursor = cur_curpos;
  while (curwin->w_cursor.lnum > 1) {
    curwin->w_cursor.lnum--;
    curwin->w_cursor.col = 0;

    l = get_cursor_line_ptr();

    // If we're in a comment or raw string now, skip to the start
    // of it.
    // XXX
    if ((trypos = ind_find_start_CORS(NULL)) != NULL) {
      curwin->w_cursor.lnum = trypos->lnum + 1;
      curwin->w_cursor.col = 0;
      continue;
    }

    // Are we at the start of a cpp base class declaration or
    // constructor initialization?  XXX
    n = 0;
    if (curbuf->b_ind_cpp_baseclass != 0) {
      n = cin_is_cpp_baseclass(&cache_cpp_baseclass);
      l = get_cursor_line_ptr();
    }
    if (n) {
      // XXX
      amount = get_baseclass_amount(cache_cpp_baseclass.lpos.col);
      break;
    }

    // Skip preprocessor directives and blank lines.
    if (cin_ispreproc_cont(&l, &curwin->w_cursor.lnum, &amount)) {
      continue;
    }

    if (cin_nocode(l)) {
      continue;
    }

    // If the previous line ends in ',', use one level of
    // indentation:
    // int foo,
    //     bar;
    // do this before checking for '}' in case of eg.
    // enum foobar
    // {
    //   ...
    // } foo,
    //   bar;
    if (cin_ends_in(l, ",")
        || (*l != NUL && (n = (uint8_t)l[strlen(l) - 1]) == '\\')) {
      // take us back to opening paren
      if (find_last_paren(l, '(', ')')
          && (trypos = find_match_paren(curbuf->b_ind_maxparen)) != NULL) {
        curwin->w_cursor = *trypos;
      }

      // For a line ending in ',' that is a continuation line go
      // back to the first line with a backslash:
      // char *foo = "bla{backslash}
      //           bla",
      //      here;
      while (n == 0 && curwin->w_cursor.lnum > 1) {
        l = ml_get(curwin->w_cursor.lnum - 1);
        if (*l == NUL || l[strlen(l) - 1] != '\\') {
          break;
        }
        curwin->w_cursor.lnum--;
        curwin->w_cursor.col = 0;
      }

      amount = get_indent();                    // XXX

      if (amount == 0) {
        amount = cin_first_id_amount();
      }
      if (amount == 0) {
        amount = ind_continuation;
      }
      break;
    }

    // If the line looks like a function declaration, and we're
    // not in a comment, put it the left margin.
    if (cin_isfuncdecl(NULL, cur_curpos.lnum, 0)) {        // XXX
      break;
    }
    l = get_cursor_line_ptr();

    // Finding the closing '}' of a previous function.  Put
    // current line at the left margin.  For when 'cino' has "fs".
    if (*skipwhite(l) == '}') {
      break;
    }

    //                      (matching {)
    // If the previous line ends on '};' (maybe followed by
    // comments) align at column 0.  For example:
    // char *string_array[] = { "foo",
    //     / * x * / "b};ar" }; / * foobar * /
    if (cin_ends_in(l, "};")) {
      break;
    }

    // If the previous line ends on '[' we are probably in an
    // array constant:
    // something = [
    //     234,  <- extra indent
    if (cin_ends_in(l, "[")) {
      amount = get_indent() + ind_continuation;
      break;
    }

    // Find a line only has a semicolon that belongs to a previous
    // line ending in '}', e.g. before an #endif.  Don't increase
    // indent then.
    if (*(look = skipwhite(l)) == ';' && cin_nocode(look + 1)) {
      pos_T curpos_save = curwin->w_cursor;

      while (curwin->w_cursor.lnum > 1) {
        look = ml_get(--curwin->w_cursor.lnum);
        if (!(cin_nocode(look)
              || cin_ispreproc_cont(&look, &curwin->w_cursor.lnum, &amount))) {
          break;
        }
      }
      if (curwin->w_cursor.lnum > 0 && cin_ends_in(look, "}")) {
        break;
      }

      curwin->w_cursor = curpos_save;
    }

    // If the PREVIOUS line is a function declaration, the current
    // line (and the ones that follow) needs to be indented as
    // parameters.
    if (cin_isfuncdecl(&l, curwin->w_cursor.lnum, 0)) {
      amount = curbuf->b_ind_param;
      break;
    }

    // If the previous line ends in ';' and the line before the
    // previous line ends in ',' or '\', ident to column zero:
    // int foo,
    //     bar;
    // indent_to_0 here;
    if (cin_ends_in(l, ";")) {
      l = ml_get(curwin->w_cursor.lnum - 1);
      if (cin_ends_in(l, ",")
          || (*l != NUL && l[strlen(l) - 1] == '\\')) {
        break;
      }
      l = get_cursor_line_ptr();
    }

    // Doesn't look like anything interesting -- so just
    // use the indent of this line.
    //
    // Position the cursor over the rightmost paren, so that
    // matching it will take us back to the start of the line.
    (void)find_last_paren(l, '(', ')');

    if ((trypos = find_match_paren(curbuf->b_ind_maxparen)) != NULL) {
      curwin->w_cursor = *trypos;
    }
    amount = get_indent();              // XXX
    break;
  }

  // add extra indent for a comment
  if (cin_iscomment(theline)) {
    amount += curbuf->b_ind_comment;
  }

  // add extra indent if the previous line ended in a backslash:
  //          "asdfasdf{backslash}
  //              here";
  //        char *foo = "asdf{backslash}
  //                     here";
  if (cur_curpos.lnum > 1) {
    l = ml_get(cur_curpos.lnum - 1);
    if (*l != NUL && l[strlen(l) - 1] == '\\') {
      cur_amount = cin_get_equal_amount(cur_curpos.lnum - 1);
      if (cur_amount > 0) {
        amount = cur_amount;
      } else if (cur_amount == 0) {
        amount += ind_continuation;
      }
    }
  }

theend:
  if (amount < 0) {
    amount = 0;
  }

laterend:
  // put the cursor back where it belongs
  curwin->w_cursor = cur_curpos;

  xfree(linecopy);

  return amount;
}

static int find_match(int lookfor, linenr_T ourscope)
{
  const char *look;
  pos_T *theirscope;
  const char *mightbeif;
  int elselevel;
  int whilelevel;

  if (lookfor == LOOKFOR_IF) {
    elselevel = 1;
    whilelevel = 0;
  } else {
    elselevel = 0;
    whilelevel = 1;
  }

  curwin->w_cursor.col = 0;

  while (curwin->w_cursor.lnum > ourscope + 1) {
    curwin->w_cursor.lnum--;
    curwin->w_cursor.col = 0;

    look = cin_skipcomment(get_cursor_line_ptr());
    if (!cin_iselse(look)
        && !cin_isif(look)
        && !cin_isdo(look)                                   // XXX
        && !cin_iswhileofdo(look, curwin->w_cursor.lnum)) {
      continue;
    }

    // if we've gone outside the braces entirely,
    // we must be out of scope...
    theirscope = find_start_brace();        // XXX
    if (theirscope == NULL) {
      break;
    }

    // and if the brace enclosing this is further
    // back than the one enclosing the else, we're
    // out of luck too.
    if (theirscope->lnum < ourscope) {
      break;
    }

    // and if they're enclosed in a *deeper* brace,
    // then we can ignore it because it's in a
    // different scope...
    if (theirscope->lnum > ourscope) {
      continue;
    }

    // if it was an "else" (that's not an "else if")
    // then we need to go back to another if, so
    // increment elselevel
    look = cin_skipcomment(get_cursor_line_ptr());
    if (cin_iselse(look)) {
      mightbeif = cin_skipcomment(look + 4);
      if (!cin_isif(mightbeif)) {
        elselevel++;
      }
      continue;
    }

    // if it was a "while" then we need to go back to
    // another "do", so increment whilelevel.  XXX
    if (cin_iswhileofdo(look, curwin->w_cursor.lnum)) {
      whilelevel++;
      continue;
    }

    // If it's an "if" decrement elselevel
    look = cin_skipcomment(get_cursor_line_ptr());
    if (cin_isif(look)) {
      elselevel--;
      // When looking for an "if" ignore "while"s that
      // get in the way.
      if (elselevel == 0 && lookfor == LOOKFOR_IF) {
        whilelevel = 0;
      }
    }

    // If it's a "do" decrement whilelevel
    if (cin_isdo(look)) {
      whilelevel--;
    }

    // if we've used up all the elses, then
    // this must be the if that we want!
    // match the indent level of that if.
    if (elselevel <= 0 && whilelevel <= 0) {
      return OK;
    }
  }
  return FAIL;
}

/// Check that "cinkeys" contains the key "keytyped",
/// when == '*': Only if key is preceded with '*' (indent before insert)
/// when == '!': Only if key is preceded with '!' (don't insert)
/// when == ' ': Only if key is not preceded with '*' or '!' (indent afterwards)
///
/// "keytyped" can have a few special values:
/// KEY_OPEN_FORW :
/// KEY_OPEN_BACK :
/// KEY_COMPLETE  : Just finished completion.
///
/// @param  keytyped       key that was typed
/// @param  when           condition on when to perform the check
/// @param  line_is_empty  when true, accept keys with '0' before them.
bool in_cinkeys(int keytyped, int when, bool line_is_empty)
{
  char *look;
  bool try_match;
  bool try_match_word;
  char *p;
  bool icase;

  if (keytyped == NUL) {
    // Can happen with CTRL-Y and CTRL-E on a short line.
    return false;
  }

  if (*curbuf->b_p_inde != NUL) {
    look = curbuf->b_p_indk;            // 'indentexpr' set: use 'indentkeys'
  } else {
    look = curbuf->b_p_cink;            // 'indentexpr' empty: use 'cinkeys'
  }
  while (*look) {
    // Find out if we want to try a match with this key, depending on
    // 'when' and a '*' or '!' before the key.
    switch (when) {
    case '*':
      try_match = (*look == '*'); break;
    case '!':
      try_match = (*look == '!'); break;
    default:
      try_match = (*look != '*') && (*look != '!'); break;
    }
    if (*look == '*' || *look == '!') {
      look++;
    }

    // If there is a '0', only accept a match if the line is empty.
    // But may still match when typing last char of a word.
    if (*look == '0') {
      try_match_word = try_match;
      if (!line_is_empty) {
        try_match = false;
      }
      look++;
    } else {
      try_match_word = false;
    }

    // Does it look like a control character?
    if (*look == '^' && look[1] >= '?' && look[1] <= '_') {
      if (try_match && keytyped == CTRL_CHR(look[1])) {
        return true;
      }
      look += 2;

      // 'o' means "o" command, open forward.
      // 'O' means "O" command, open backward.
    } else if (*look == 'o') {
      if (try_match && keytyped == KEY_OPEN_FORW) {
        return true;
      }
      look++;
    } else if (*look == 'O') {
      if (try_match && keytyped == KEY_OPEN_BACK) {
        return true;
      }
      look++;

      // 'e' means to check for "else" at start of line and just before the
      // cursor.
    } else if (*look == 'e') {
      if (try_match && keytyped == 'e' && curwin->w_cursor.col >= 4) {
        p = get_cursor_line_ptr();
        if (skipwhite(p) == p + curwin->w_cursor.col - 4
            && strncmp(p + curwin->w_cursor.col - 4, "else", 4) == 0) {
          return true;
        }
      }
      look++;

      // ':' only causes an indent if it is at the end of a label or case
      // statement, or when it was before typing the ':' (to fix
      // class::method for C++).
    } else if (*look == ':') {
      if (try_match && keytyped == ':') {
        p = get_cursor_line_ptr();
        if (cin_iscase(p, false) || cin_isscopedecl(p) || cin_islabel()) {
          return true;
        }
        // Need to get the line again after cin_islabel().
        p = get_cursor_line_ptr();
        if (curwin->w_cursor.col > 2
            && p[curwin->w_cursor.col - 1] == ':'
            && p[curwin->w_cursor.col - 2] == ':') {
          p[curwin->w_cursor.col - 1] = ' ';
          const bool i = cin_iscase(p, false)
                         || cin_isscopedecl(p)
                         || cin_islabel();
          p = get_cursor_line_ptr();
          p[curwin->w_cursor.col - 1] = ':';
          if (i) {
            return true;
          }
        }
      }
      look++;

      // Is it a key in <>, maybe?
    } else if (*look == '<') {
      if (try_match) {
        // make up some named keys <o>, <O>, <e>, <0>, <>>, <<>, <*>,
        // <:> and <!> so that people can re-indent on o, O, e, 0, <,
        // >, *, : and ! keys if they really really want to.
        if (vim_strchr("<>!*oOe0:", (uint8_t)look[1]) != NULL
            && keytyped == look[1]) {
          return true;
        }

        if (keytyped == get_special_key_code(look + 1)) {
          return true;
        }
      }
      while (*look && *look != '>') {
        look++;
      }
      while (*look == '>') {
        look++;
      }
      // Is it a word: "=word"?
    } else if (*look == '=' && look[1] != ',' && look[1] != NUL) {
      look++;
      if (*look == '~') {
        icase = true;
        look++;
      } else {
        icase = false;
      }
      p = vim_strchr(look, ',');
      if (p == NULL) {
        p = look + strlen(look);
      }
      if ((try_match || try_match_word)
          && curwin->w_cursor.col >= (colnr_T)(p - look)) {
        bool match = false;

        if (keytyped == KEY_COMPLETE) {
          char *n, *s;

          // Just completed a word, check if it starts with "look".
          // search back for the start of a word.
          char *line = get_cursor_line_ptr();
          for (s = line + curwin->w_cursor.col; s > line; s = n) {
            n = mb_prevptr(line, s);
            if (!vim_iswordp(n)) {
              break;
            }
          }
          assert(p >= look && (uintmax_t)(p - look) <= SIZE_MAX);
          if (s + (p - look) <= line + curwin->w_cursor.col
              && (icase
                  ? mb_strnicmp(s, look, (size_t)(p - look))
                  : strncmp(s, look, (size_t)(p - look))) == 0) {
            match = true;
          }
        } else {
          // TODO(@brammool): multi-byte
          if (keytyped == (int)(uint8_t)p[-1]
              || (icase && keytyped < 256 && keytyped >= 0
                  && TOLOWER_LOC(keytyped) == TOLOWER_LOC((uint8_t)p[-1]))) {
            char *line = get_cursor_pos_ptr();
            assert(p >= look && (uintmax_t)(p - look) <= SIZE_MAX);
            if ((curwin->w_cursor.col == (colnr_T)(p - look)
                 || !vim_iswordc((uint8_t)line[-(p - look) - 1]))
                && (icase
                    ? mb_strnicmp(line - (p - look), look, (size_t)(p - look))
                    : strncmp(line - (p - look), look, (size_t)(p - look))) == 0) {
              match = true;
            }
          }
        }
        if (match && try_match_word && !try_match) {
          // "0=word": Check if there are only blanks before the
          // word.
          if (getwhitecols_curline() !=
              (int)(curwin->w_cursor.col - (p - look))) {
            match = false;
          }
        }
        if (match) {
          return true;
        }
      }
      look = p;

      // Ok, it's a boring generic character.
    } else {
      if (try_match && (uint8_t)(*look) == keytyped) {
        return true;
      }
      if (*look != NUL) {
        look++;
      }
    }

    // Skip over ", ".
    look = skip_to_option_part(look);
  }
  return false;
}

// Do C or expression indenting on the current line.
void do_c_expr_indent(void)
{
  if (*curbuf->b_p_inde != NUL) {
    fixthisline(get_expr_indent);
  } else {
    fixthisline(get_c_indent);
  }
}

/// "cindent(lnum)" function
void f_cindent(typval_T *argvars, typval_T *rettv, EvalFuncData fptr)
{
  pos_T pos = curwin->w_cursor;
  linenr_T lnum = tv_get_lnum(argvars);
  if (lnum >= 1 && lnum <= curbuf->b_ml.ml_line_count) {
    curwin->w_cursor.lnum = lnum;
    rettv->vval.v_number = get_c_indent();
    curwin->w_cursor = pos;
  } else {
    rettv->vval.v_number = -1;
  }
}
